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Anmeldelser og tests 



Softspot 10 

RUN's faste sicfer til anmeldelse af 
de nyeste og mest spaandende pro- 
grammer, 




Boganmeldelser 16 

Vi har kikket pi et par nye Comafbo- 
ger og en bog om 128'eren. 

Arets julegave 18 

Nyt om denne fantastiske farveprin- 
ter, der ikke koster mere end en 
almindelig matrix printer. 




Muselojerligt 

En anc/en julegaveide 



49 



Dantekst 52 

RUN har testet Danmarks mest 
sotgte tekstbehandlingsprogram -til 
PC'eren. 

Compilere 54 

RUN har kikket pi fordele og ulem- 
per ved de to bedste compilere til 
Commodore 64. 

Der war engang 56 

RUN's faste adventure-sider med 
omtafe af de nyeste spil. 

Printer interface 59 

Har du adgang til en printer uden 
Commodores serielle strk. er her 
losnlngen pa" problemet. 
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ips, tricks og vejledrring 



Comal 80 skole 12 

Fjerde del af RUN's Comal skole, 
trvor alle kan veere med. 

128'eren - bit for bit 14 

Vi fortsastter vores tur gennem 
128'eren sakaldte zeropage. 

Input/Output 22 

Nye spsendende sporgsmil og svar 
i RUN's /aeserbrevkasse. 

Begyndersiden 22 

Vi fortsastter vores bestra?belser for 
at give den nybagte computerejer 
en hjaslpende hind. 

Maskinkode 24 

Vi gennemgar et helt maskinkode- 
program, du kan taste ind med din 
maskinkodemonitor 

COMind/COMud 48 

Under denne pudsige overskrift vil 
RUN fremover besvare l&ser- 
sporgsma"! om Comal 80. 



Programmer 



Leeserprogrammer 27 

Vi modtager mange gode program- 
mer, der bor komme alle RUN's las- 
sere til gode. 

Lydgenerator 50 

Bjarne Jensen afrunder sin gen- 
nemgang af lydchip 'en med et pro- 
gram, der gor det le t at feegge /yd pi 
egne programmer, 

RUN Software Club SO 

Sidste nyt fra RUN Software Club. 
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Nyheder 6 

Vi har denne gang nassten fire sider 
spraangfy/dt med nyheder. 

Indtastningsvejledning 44 

Lass den for du begynder at taste 
dine programmer ind. 

RUN Amok 66 
Spalten vi heist ville undvasre. Kor- 
rektioner og rettelser. 
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A PUBLICATION OF 
CW COMMUNICATIONS 



Mangier du noget til din Commodore 64? 

VI HAR DET 



Hi 



ADMINISTRATIVE SYSTEMER 



COMF1 NANS 



version 
2.0 




Finansbogholderiei lil Commodore 64, der er W*r- 
vel en bestseller i lobel af et hv. Over 250 syslenier 
kderpa nuvierende lidspunkt. 
COMFINANS er blevei forbedret igen. ved ul 
man lean fa udskrifl af en konio piWk.irm.samt en 
aldobfllaoce til enhver lid. Hastigheden er ogsA 
blevei foraget. 

Kapaeiiel: 1 '200 post cringe rpr. periode,300konti. 

Og prisen er del hedslo 
ved det hele. For kr. 2.095.- NU kr. 



1.595 



version 
2.0 




FakturasyMemcl lil Commodore 64 der ikke bar 
nogen konkurrent. 

Fakiurering, kontnudtrtg. renieberegning, lager 
og mcgel mere. Programme! kan koreselvstarndigl 
eller intcgreres med COMFINANS. 
Kapueilcl: 250 kunder. 250 varer, 

Forpris kr. 2.595.- 



NU kr 



1.795 



Beggc sysic-mcr samlet kun kr. 2.995,- 



SP/ENDENDE UDVIDELSER 




Parallel Printer 

Interface medl6K buffer 



Med dcttc interface kan man tilslutte 
ruts ten enhver parallel printer til sin 
Commodore 64. Den tilstultes den 
sericllc udgang og benytter 
ikke noget software. 

Pris kr. 



1.104 




80 tegns tekst- 
behandlingskort 

Her far Du et SO tegns korl med DANSK tekst- 
hchundling. Endelig kan man se 80 tegn p,i 
skaumcn. nar man skrivcr sine breve. Endvi- 
derc harden et digiiult ur, fastirysningaf 
linier osv. 



Pris kr. 



1.748 



COM-IN 64 

Et belt nvt produkt fra MCH. 
COM-lr^ 64 er el kommuniku- 
lionsinterfuee med faciliiet 80TB 
UMgendc: 

CW. R TIT. TEXT. MODEM. 
MAILBOX. AFSKOUT. 
Kummunikationsinierfaa*! ill 
begynderen og den 
professioncllc. 

Pris kr. i 



3.039 



Eprom brsender 

Hcrer Din Eprom bncmlenil 
Commodore 64. 
Software <r na- 
lurligvis med i 
prison Bramdc- 
ren kan brarnde 
eprom typer fra 2508 til 27128. 
Endvidere mcdl'olgcrdcr £prom- 
kon til lilslutningaf de Eproins 
man^harbrtcheft, 4 Oilfl 
Pris kr. I .0*Kl 



Eprom sletter 




Eprom sletiercn kan slette op til 
fire Eprorm 
ad gangen og 
arbejder fiild- 
stamdig 
ualnitngig a! 
eompuieren. 



Pris kr. 



707 



Motherboard 

T illadcr tilslutning af t'lere mod u 
ler af en gang. F.eks. SO tegns 
kon og Simons Busic. 
Molherboardene er nalurligvts 
ikied omskifter. 

2 pom- 241,- 

5 porte 741 ," 



DE BEDSTE B0GER 



fra 1 st Publishing (Data Becker) 



Tricks & Tips 

Bogen giver ideer lil. hvordun man 
lavcrcftcktivc programmer, ved bruii 
iif utalligc programekNempler. Den 
il .ii..-. i haegrund (or Ucmngnl'Mtfire 
ongavei Pits kr, 24B,- 
1 neks and Tips disk med 
alle programmer kr. 85,- 



ft 



Adv. Machine 
Language 

Denne bog er en fortueiielse af 
Machine Language bogen, og gar 
mete i dyhden med maskinprogniin- 
mc nng. Bogen er uundvierhg for den, 
som nnskcr at hlivc bedrc i ai pro- 
grammer e i rtuMkinkOdo. Priskr. 248,- 



Anatomy of 64 

Bogen gai iuldsnrndig i dybden tried 
Commodore 64 ngdens vtrkemade 
Den hat f.fikl cm deuiljcrci ROM litt- 
ningmed fnrklaring DcMiden mange 
uk&cniplerpa pmgrammcr 
saman kan prove del hele 
I pak&s Priskr. 248,- 
Bogcn enhver Cnmmodore 
cjerhurdc have 



ft 



Idea Book 

Bogen er en forsisariiclsc 
rilTrick*& Tips. Dcnhjslpcrcnigang 
med siorre programmeringsopgav-er 
og annlywrer fonkellije itorrc 
programmer Ifctgen der skulle sib pa 
Dinhvlde. Priskr. 24ft,- 



An atomy of the 1541 

Bogcn giver en fuldsla'tidig besknyel- 
sc nf. Jivurdan Du beds! uunyttcr lil 
din VC 154 1. Bogcn indchokler dcs- 
udcn en loinl ROM-liMning Jif 
DO&'en. Bogcn man ikke 
kan undvjerc Pris kr. 248,- 



Graphics Book »aS 

Har dn proMemcr med ai 
lave gjatik pa Din Commodore ft4 ( 
Ikke mere! Bogen har ckscmpler pa. 
hvnrdan man kuti hruge hojoplm- 
ningsgrahkken p;i Commodore W 
Pris kr. 248,- 



Machine Language 

Mu*kin>pn>gspiugranimenng er 
ydent fleksioett og mcgcl hurtigcrc 
end Basiv. Bugen cr cn begyntlcrrH'^ 
ogrorlJcllcromdi:grundl.Tggcndcbt:- 
greber indenfor inaskin- 
ki>den 0nik er Du al txse 
maskinkodc - herd bogcn 
du har dromi om. 
Priskr. 248,- 




Peeks & Pokes 

Bogen ei ei opslags- ™ 
vxrk nl at hrage alle de nyuige UdrCJ 
icr, der findes pa C ommodore 64 
Denne bog rnnliandlcr del. mange 
Commodore 64 ejeie har tuvnci 
Pris kr. 225.- 



.leg onsker al bestille □ folgendc produkter. fl* yclerligerc materialc □ og fa det send! til: 



Navn: . 
Adr.: _ 
By:_ 
Tlf.: _ 



MCH 

M0lleplad»en 3, 6100 Haderslev 

Tlf. 04-53 17 71 





Commodore -Worl 

Torveged* 62 - 1*00 KflbtflhAvn X 

TN. 01 ■ 85 8*85 



udgWer ComputefWorld Denmark 
A/S- Ansvarshavende redafcten J»r- 
gen Jorgensen. Fagredakllon: Hen 
ning Randmose. Bjarne V. Jensen, 
Robert Ch. Noya, Tor Engebakken. 
Flamming Lerbaeh, Robin Sagar, 
Sleen Schmeltzer. Direktion- Pre- 
ben Engell (adm. direklor). Annon- 
cechel Peter Lybro, Bladsek reiser: 
Grllh Axel. Abonnemont Dorthe 

Chrislensen. Telelon: (01) 9S 56 95. 

Telex: 31 566 CWDAN. Distribution: 
Dansk Cenlnafagentur. Sals'lryk; 
J.H. Schultz A/S, Kobenhavn. Op- 
lag: 25.000. 

RUN ar el medlem under CW-Communicatfom Inc. 
*«rdons stfltsie udgi»er if daiaorlontirai Infoftnalion. 
G<uppon udglve* 61 computer. pubtiketionei 1 19 Indo- 
iiMtanoe 9 million*! laasai an eller liar* at gruppen* 
puDlikatlonir hvar monad. Modiammerno at gruppen 
ar 

Argentina CnmpulerworldfArnentlrus 

Buyer's Qulda. 
Auilrallen: Australia CompulBfwoild. 

Australian PC W«*) and OlMCtVrtaa. 
Bratliwn Oala Now*, 

Micro MiBida. 
Canada CompulDtwortO Canada. 

PC Wort) Canada. 
Dammar*: ComputBrwortd Danmarlc. 

PC WORLD. 

Buy** 1 * QuWM. 

RUN. 

E i^Ctand Computer Maw*. 

Computer Management. 

Com puis* Bustnesa Europe, 

PC Bu»lne« World 
Finland: MOuo. 
Franhng: La Monde Inlormalique. 

Goto*" (Apple). 

OPC (IBM), 

Buyer/a Guide. 
Holland Compuierrnorld Bonekn. 

PC Work) Benelux. 
Indian.' Dataquest 
llaHen. Cornputeraroffd Itaila. 

Japan- Compuierworld Japan, 

ParaoCoff World 
Ktna: China Computer* orid 

Me* ic o : C ompu la rwoildVMci too, 

Com puM undo 
Noroo Compularwoild Nome. 

PC World 

RUN. 

Saudl Arabian: SfludU Computemortd 
Singapore; Ttja Asian CorrtpuitrworM. 
Bp anr*n C ompulerwoi Id Espana, 

MtooStslemst. 

Commodore Worict 
Svehoe: CnmpulerSwreden. 

MlfcroDalom, 

PC Wortd. 
Tyshland: ComputarWocna, 

MlcroComputPrWdl. 

PC Wall 

Software MatH 

CW EdlUonrSerrUnar. 

Compular Business, 

RUN. 

Apples 

USA' Compuierworld 

on Com mimical ion*. 

HotCoCo, 
ln-CMer. 

mmm, 

Macworld, 

MCRO MAPI ETW0HLD\ 
PC Wortd, 
PC Jr. Wortd. 
Run, 

TSMaouma, 

so-Micro. 

Vanaxuetn: Comouterworlfl Vanenaala. 



ISSN 01QMI21 

Foi&ide: Design John Bo nidge - Foro Knud Jacob* en 



Cottiputerjul 

Der findes efter sigende omkring 
200.000 hjemmecomputere her i 
landet - og mange vil folge de kom- 
mende ar. Omkring halvdelen hed- 
der Commodore og |agten dan- 
skernes julegavekroner er i fuld 
gang. Der vil ligge mange compu- 
ters under juletrceet i ar. 

Commodore er ikke sa enera- 
dende pa markedet som sidste ar, 
og selv om 128'eren er en spasn- 
dende computer, tror jeg alligevel, 
det er den gc-de gamle 64'er, der vil 
dommere julehandelen i ar Igen. 

64'eren er bestemt ikke pa vej ud 
i morket, og der saalges diskette- 
stationer og printere som aldrig for. 

Jeg kan ikke lade vasre med gore 
mig mine tanker om det kommende 
ar, De markante prisfald. vi har ople- 
vet de sidste par ar. ser ud til at 
fortssette. Ikke fordi computerne er 
blevet tilsvarende billigere at frern- 




stWe. men fordi konkurrencen er 
blevet endnu mere hard end nogen- 

sinde. 

FS vil overleve, og mange vil 
bukke under. For brugeren er det 
heller ikke sjovt at sidde med et fa- 
brikat. der udgaet. Det billlgste kob 
er ikke altid det bedste! 

Den PC'er, der for fa ar siden var 
kontorets prestige-objekt, vil i lobet 
af kort tid erstatte hjemmedatama- 
ten. 

Commodore Data i Danmark har 
haft et godt ar, mens Commodore 
International har haft et darligt ar 
Tendensen i USA er ofte skriften pa. 
vseggen i Europa. men da man er 
optimistiske derovre, vil jeg dele 
den optimisme og onske Commo- 
dore og alle RUN's lassere en gla=- 
delig computerjul og et rigtig godt 
nytar. 
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Commodore 64 <& 
Logo Primer 

Discover how easy it is 
to learn Logo. This book 
teaches anyone - novice 
or advanced user — how 
exciting, useful and crea- 
tive Logo can bo. 

294sider. dkr 364,- 
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Commodore Logo 

Activities for Exploring 
Turtle Graphics 

Shows u*ers how to con* 
troi movement of the 
"turtle"throgh simple 
LOGO command). 

303 sitter, dkr 350.- 



1001 Things to Do With 
Your COMMODORE 64 

Mark R. Sowusch & 
Tan A. Summers 

A gold mine of exiting 
ideas - more than 1000 
ways you can use your 
Commodore 64. 

243 sider, d ki 195- 
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128 D 

En ny Commodore computer sen- 
des meget snart ud pS markedet. I 
hver fald i Vesttyskland. hvor myn- 
dighederne nelop har godkendt 
den i en afprovning svarende til vo- 
res DEMCO. Det forste billede af 
maskinen kan vi prassentere her - 
og de forste facts. For det forste er 
maskinen 100% lig med 128'eren, 
som vi kender den nu. Imidlerttd irt- 
deholder den en 1571 diskstation. 
som fungerer efter planerne, altsS 



med to siders aftastning. Tastaturet 
er lost i forhold til det ovrtge isen- 
kram, men kan gemmes vaak I en 
lomme p5 bagsiden a* CPU-boksen. 
Et hSndtag gor hele herligheden 
transportabel! Vsegten bliver om- 
kring 13 kilo og malene pi huset er 
40x30x10,5 cm. Tastatur layoutet 
svarer til 128'eren. Endelig er CPU- 
boksen beregnet til at bsere monlto- 
ren - altsa en meget kompakt kon- 
struktion. 



K«MPE TAB 

Commodore har ikke haft det godt 
i 1985. Ikke ford) man ikke har skabt 
sensation med Amigaen, men fordi 
man har faet den bolge af af matning 
pa det amerikanske computermar- 
ked ind pS livet. Commodore har 
ikke haft noget svar pk de store - og 
i USA er det f.eks. IBM og Apple - 
firmaers udbud af business-maski- 
ner. PC10 og 20 er naesten ikke 
solgt i USA, men de gar som varmt 
brod i Europa - forst&eligt nok. De 
er klasser bedre end IBM's ma- 
skine. som de er bygget efter. Men 
alt i alt har Commodore Internatio- 
nal kunnet notere et dundrende un- 
derskud pa 114 millioner dollars. 
Aret fpr havde man 144 millioner I 
overskud. Alene i sidste kvartal - op 
til juni. som er Commodores regn- 
skabs&r - har underskuddet vaaret 
124 millioner dollars. Men efter be- 
styrelsesformand Irving Coulds ud- 
sagn, venter Commodore, at botten 
vender allerede i indevserende kvar- 
tal. Mest fordi man nu endelig har 
f&et gang i 128 salget og f3et Amiga 
projektet pa skinner. 



OM AT DELE 

Op til otte arbejdspladser kan deles 
om f.eks. en diskstation eller en 
printer, hvis de forbindes gennem 
det Canadiske firma. Comspec 
Communications Inc. multisystem 
»Microshare«. Ud over styringen at 
de mange forbindelser byder enhe- 
den ogsa pa" IEEE og seriel portmu- 
ligheder. Skoler og andre steder, 
hvor mange terminaler stilles op. vit 
kunne bruge systemet. som vel 
ogsa er for dyrt for andre. Prisen er 
omkring 525 pund. Adressen er: 
153 Bridgeland Avenue, Unit 5. To- 
ronto. Canada. 
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tAlmodighed 

Der skal god talmodighed til al ar- 
bejde med Commodores compu- 
ter. Ikke blot fordi den diskettesta- 
tion 1541, som vi i dag rr\k nojes 
med, er slov, men ogsa fordi den 
aflastning, der var lovet fra Commo- 
dore udebliver. Vi ville gerne have 
kunnet fortselle og afprove den 
••nye» 1570'er, der skal vsere mel- 
lemled til 1571, som virker dobbelt- 
sidel. Men den kom heller ikke - 
som lovet - her til lander inden vor 
deadline- Imidlertid skulle den vaere 
her i begyndelsen af december, nar 
dette blad er pa gaden. 

Hvad er det sa. der bydes pa? 
Forst og fremmesl mere hastighed. 
Som sin forgasnger er kabinettet i 
samme slags plaslic. Den betjener 
sig ogsa af en 6502 chip som styring 
og har en 32K stor ROM DOS (Disk 
Operativ System). Den kan udfore 
alle 1541 og 1571 kommandoerne, 
men kan alts& kun rumme 170K pa 
en side af disketterv Den arbejder 
med 300 bit pr. sekund i overfor- 
selshastighed sammen med C64 ( 
VlC-20, C16 og PLUS/4, mens den 
nrbejder med 5200 tegn | 128-mo- 




dus og under CP/M. Den virkelig 
gode nyhed - ud over den store ha- 
stighed - er. at den kan laese andre 
computerfirmaers formater under 
CP/M. Det betyder, at der bliver ad- 
gang til CP/M programer under 
Kay-pro, Epson, Osborne og IBM. 
Der er tale om enkeltsidet MFM for- 
mat. Det betyder f.eks. at 128'eren 
vH kunne laese PC10/20 program- 
mer, der er formatteret under IBM- 
format. I disse formater er kapacite- 
ten mellern 13QK og 200K. Prisen pa 
1570'eren er ca. kr. 4.000,00, mens 
prisen pa 1571 'eren forventes at 
blive ca. 4.500,00, oplyser Commo- 
dore i Horsens. Sidstnaavnte kom- 
mer i ovrigt forst til landet om et par 
maneder. 



AMIGA 

Commodore International bruger 
nu manglen pa »kvalificeret« soft- 
ware som undskyldning for deres 
sene lancering af Amigaen i Europa. 
Men de store softwarehuse har faet 
adgang til Amigaen, selv om nogle 
af dem river sig i hSret over den 
mange muligheder, de skal til at ud- 
nytte. Da f.eks. en maskine som Ma- 
cintoch blev sosat fra Apple, fulgte 
der teknikere med hvert eneste pro- 
veeksemplar. Med Commodores 
maskiner er der end ikke tilstraakke- 
lig dokumentation, klager software- 
fabrikanterne. Maskinen forventes 
stadig til Europa tidligt nseste ar. 



CP/M 3,0 (plus) 

Firmaet Autoexec har faet lagt de- 
res Turbo Pascal i MFM format, sa\ 
den kan bruges med 1570 og 1571 
diskettestationerne . 

Leverandorer der har CP/M 2,2 
og 3,0 programmer i MFM og GCR 
format vil ved fremsendelse af do- 
kumentation blive optaget pa den 
liste over software i CP/M til C128, 
vi pataenker at bringe her i bladet. 




Fra Randers Musikimport har vi 
modtaget nyt om keyboards tit 
64'eren. Der er kommet flere nyhe- 
der til landet, bl.a. SlEL MK 370 med 
37 tangenter i fuld storrelse. Disse 
kan deles i 12 tangenter til akkom- 



MODEM 

Datametrix ApS har netopfaet god- 
kendt et Interlekt modem til indbyg- 
ning (i computer/kasse) som di- 
rekte, altsS uden interface. Kan til- 
sluttes Commodore 64/128. Har 
omskifter for 1200. 300 og 75/1200 
baud, fuld/halv duplex. 



pagnement og resten til solostem- 
men. Der 8 stemmer, 8 rytmer og 
1-finger akkorder. Pris kr. 2.995,00. 

SIEL MK 490 har 49 tangenter i 
fuld starrelse. 10 digitale stemmer. 
Det kan deles i 16 eiler 24 tangenter 



TEST AF MODEMS 

Pa redaktionen testes for ojeblikket 
2 Interlekt modems med 1200, 300 
og 75/1200 baud, det ene har au- 
tosvarer. Vi har ogsa 2 ITT modems, 
udlant af KTAS. Et til 300/300 baud 
og et til 75/1200 baud. Lses om re- 
sultatet i kommende numre. 



til akkompagnement og resten til 
solo. ^Sequencer- til programme- 
ring af 12 akkorder, 1-finger akkor- 
der og 10 rytmer. 

Pris kr. 3.995,00. 

Vil du ofre kr. 4.995.00 kan du fa 
SIEL MK 610 med 61 tangenter og 
en masse laakre taciliteter. 

Alle 3 keyboards har RS 232- og 
kan foruden 64'eren tilsluttes de fle- 
ste synlhesizere pi markedet. Des- 
uden er der mulighed for at bruge 
programme! 16 TRACK LIVE SE- 
QENCER til alle 3 keyboards. 

Importoren stdr til r&dighed med 
yderligere oplysninger pa tlf. (06) 41 
11 88. 



PA KUGLELEJER 

Mange soger alternativer til deres 
joystick, hvis de skal bruge et hjsel- 
pemiddel i programafviklingen af 
f.eks. business-software. To alter- 
nativer kommer isaer pa tale og 
nefop nu har firmaet Undy-Elektro- 
nik GmbH, Postfach 1428, 6800 
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Manheim 1, udsendl dem begge: en 
lyspen og en trackball. Begge arbej- 
der i forbindelse med et indstiksmo- 
dul i gameporten pa 64'eren. og 
samtidig forbindes de selv via joy- 
slickindgangen. Begge apparater 
er meget praacise. Swedes skulle 
man med lyspennen kunne fange e! 
enkelt punkt pa skaarmen. Commo- 
dore har i ovngt selv udviklet en 
»mus«, der dog forelobig kun kan 
kobes i USA. 



KOM TIL KORT 

Et nyt begreb er ved at vinde indpas 
i softwarekredse. Det er -Soft 
Card*. Kortene ses pa fotoet og de 
aflaases gennem den adapter, der 
sidder i gameporten pa 64'eren. Det 
er firmaet Reis-Ware Computer 
Produkte GmbH, Bergstrasse 80, 
5584 Bullay, telf. 065 42 27 15, som 
forhandler kortene. Forskellige soft- 
warefirmaer er interesserede bl.a. 
pa grund af kopiproblemerne, men 
ogsa. fordi de selv vil vsere i stand til 
at programmere dem uden saarlig 
store omkostninger. Kortene findes 
i storrelser fra 16-128 Kbytes og i 
bade ROM, PROM. EPROM og 
CMOS-RAM med batterl backup. 
Forelobig findes adapter og kort til 
C64/128'eren og MSX computere. 
men Here typer er pa vej. 




VIZAWRITE 128 



Det velrenomerede program Viza- 
write er nu kommet i en ny 128-ver- 
sion, kaldet -Vizawrite Classic-. Det 
har ud over det gamle programs til- 
bud en del nyt at byde pa: En reg- 



nemaskine som pull-down funktion, 
teksten kan skrives ud i op til 8 spal- 
ter, der er stave-check, proportio- 
nalskrift, tre slags forprogramme- 
rede typer og man kan tilpasse sine 
egne typer bade pa printeren og 
sksBrmen. Programmet er endnu 
kun set i England Tlf. 0634 813780. 




AMIGA SOFT 

De forste softwarefirmaer har mat- 
tet betale omkring 1700 pund for 
deres forste Amiga. Det har om- 
kring 20 softwarefirmaer og andre 
vasret villige til - og har haft mullg- 
hed for. Men Commodore under- 
streger, at det er en pris pa udvik- 
lingsmaskinerne. Den endellge pris 
vil formentlig btive noget lavere. En 
at dem, som har i sfcnde at lave soft- 
ware, er Wirrorsoft, der arbejder 
med programmerne -Fleet Street 
Editor*, 

Hisoft vil overssette sine sprog- 
pakker Pascal, Devpac og C. 

Virgin arbejder med en raakke 
meget avancerede spil og Electric 
Dreams arbejder rned en forbedret 
version af »l of the Mask-. Endelig 
har Commodore selv planer om at 
fa alle de kendte USA-titler som 
Textcraft, Graphicraft, Musicraft, 
Moviecraft, Clackcraft, Logo og C til 
Europa. De kan fas til USA-versio- 
nen af Amigaen, der allerede er 
solgt adskillige af. Endeltg vil Meta- 
comco sende deres Pascal ud. Det 
er for evrigt dette firma, som har 
lavet bl.a. AmigaDos, som jo har 
kvaliteter, som de hidtil kun har set 
i GEM. 



COMMODORE LCD 

Naeste ars Commodore-godtepose 
vil formentlig ikke blot rurnme en 
Amiga, men ogsa en anden compu- 
ter, der er rettet mere mod busi- 
ness-folket end hjemmeprogram- 
moren. Det er Commodores planer 
om en transportabel computer, der 
lever i bedste velgaende. Det bliver 
efter alt at domme en computer 
bygget over og med et plus/4 agtigt 
udseende, men med en skaerm, 
som kan vise 25 linjer, formentlig i 
40/80 tegn. Commodore har udsty- 
ret LCD-computeren med en het del 
indbygget software. Der er anvendt 
en meget energibesparende 
CMOS-teknik i chip-opbygningen. 



Det bliver spasndende at hore noge 
officielt om denne nyskabefse fra 
Commodore, 
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EJ EN STAN DA RD -DISKETTE MEN 
PR IS SOM EN SAD AN. 
LEVERES I PLASTBOKSESOM STANDARD. 
EG EN PRODUKTION ERA A-Z. 
LIVSVARIG NEDS LID'S GARANTI. 

Eksemp/er hvor Xidex gar langt over ansi krav: 

• 65% clip-level (h0jeste i branchen). 

• Centerhul's tolerance forbedretmed 50%. 

• Altid perfekt sporing. 

• H0jglanspoleret overflade. 

• Nul slid pa hoved og diskette. 



ENEIMPORT0R: 




L angel in ie 15, Snekkerup, 4140 Borup. 
Tlf. (03) 62 88 00. 





WINTER GAMES 

Nu er spillet WINTER GAMES ende- 
lig komrnet. Det var med megen 
spending, jeg startede spillet op, 
for de kunne da ikke overga sig selv 
endnu engang - men minsanten om 
det ikke er lykkedes! 

Spillet starter som i SUMMER 
GAMES med en abningsceremoni, 
men denne gang pa et sne-daakket 
stadion. Man vaslger sa, om man vil 
kaempe sig gennem alle syv sports- 
grene, eller kun ove i en enkelt. La- 
ver man konkurrence, kan der va*re 
op til otte deltagere. Man skriver sit 
navn ind. vaslger det land man heist 
vil kaempe for, og sa starter sa hele 
spillet. 

Forst ksempes der i Hot Dog (luf* 
takrobatik), og det gander seivfol- 
gelig om at lave sa elegant et sving 
som muligt i luften, og sa komme 
ned pa begge ben (med ski pa. her 




er der mange sjove variationer at 
falde pa. og de giver ingen point). 

Herefter gar man videre til Skj- 
skydning, hvor du forst lober i lige 
terrain, sa ned at bakke, op igen og 
videre . inden du kommer hen til sky- 
debanen, hvor du skal udlose fem 
skud, efter forst at have taget lade- 
greb for hver skud, sa videre igen 
indtil du har faet skudt alle 20 skud 
af (pas pa pulsen. er den for hoj er 
det vanskeligere at ramme). 

Hurtiglob pa skpjter, er den nas- 
ste gren. Den minder lidt om svom- 
ning i Summer Games, hvor man 
skal bruge joysticket hurtigt. men 
alligevel folge rytmen i loberen. 

Herefter folger der noget sa ele* 
gant som figurlob. Det er svaert at 
fa det til at se elegant ud, og nar det 
endelig er lykkedes at lava et nyde- 
ligt spring, falder skojteprinsessen 
maske ved det naeste forsog, men 
hvem siger ogsa det skal vasre let, 

Sa folger Skihop, og her er der 
anderledes fart over feltet.sa meget 
fart, at det kan volde nogle proble- 
mer at komme paent ned. Her bliver 
der ogsa givet karakterer i stil. og 
den kan jo vasre noget blandet. 

Det med skojter er ikke overstaet 
endnu. Nu skal vi til Kunstskojtelob, 



og her far man 2 mtnutter til at ud- 
fore sine spring og spin, (en virkelig 
vanskelig disciplin). Ogsa her far 
»prinsessen« mange bla marker, 
men hun er en stasdig dame, sa hun 
fortsaetter til den bitre ende. 

Til slut kommer sa Bob siaaae, 
hvor der igen er fart over feltet, 
nogle gange sa meget, at man vsel- 
ter, og det ma man sa prove at kor- 
rigere ved at styre med sit joystick. 

Det var sa den sidste, og efter 
den kommer bilfledet med alle ver- 
densrekorderne. 

Grafikken er ganske flot, musik- 
ken mangier heller ikke. Selv melo- 
dierne der er lavet til skojteprinses- 
sens dans, er tint afstemt, og lydef- 
fekterne til de ovrige sportsgrene 
passer ogsa fint. 

Konklusion 

Et meget underholdende og varie- 
rende spil for hele familien, og har 
man et af de forgaende spil. beho- 
ver man ikke at holde sig tllbage fra 
at kobe dette, da det er meget an- 
derledes. 

Titel; WINTER GAMES 
Computer: CBM 64, 128 
Medium/pris:band 178,- disk 
248,- 

Betjening: Joystick 
Firma: Epyx Computer Software 
Impotor: Twilight tlf .01 -8S0734 
Quicksort ApS tlf.01-241233 



Min mening (1 - 13) 

Computerbrug: 13 
Manual: 11 
Betjening: 13 
Vedvarende appei: 11 
Helhed: 11 
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SPY vs SPY vol II 

Hovedpersonerne i dette spil er spi- 
onerne X og Y fra tegneserieheftet 
MAD. Du kan vaeige at spille mod 
computeren eller mod en ven. Pro- 
gramme* er udrustet med nogel 
man kalder for •■Simulvision-, det 
deler skasrmen op i to halvdele, hvil- 
ket gor det muligt at se, hvad bagge 
spiilere gor samtidig. Altsa et rigligt 
2 personers spil. 

Historien er: Det superhemme- 
lige missil XJ 4 1/2 er nodlandet pa 
en liiie o, hvorpa der betinder sig en 



stadig aktiv vulkan. Du bliver smidt 
ud over o'en i en fatdskasrm (det gor 
din modspiller ogsa). Det er din op- 
gave at finde 3 stumper fra det ha- 
varerede missil. Men det er ikke nok 
at finde stumperne, du skal ogsa 
sastte dem rigtlgt sammen. Hvis det 
lykkes tor dig, kan du komme bort 
fra o'en ved hjaelp af en ubad 

Det lyder jo nemt nok! Men din 
modspiller eller computeren, leder 
efter det samme som dig. Der er 
ogsa noget med, at vulkanen vist 



nok snart f£r et nyt udbrud. Hvis du 
spiller mod computeren, skal du 
skynde dig. Der findes kun de 3 
stykker af missilet. 

Oer er mulighed for. at man kan 
Isegge fselder for hin- anden, men 
pas p& du ikke falder i en af dine 
egne. Desuden er der en masse 
kviksand pS o'en. 

Konklusion 

Et sjovt spil med en god grafik som 
nok bliver endnu bedre. n&r man har 
forstaet den grundige brugervejled- 
ning. Kan anbefales, men jeg ved 
ikke. hvor lasnge det kan holde en 
fanget. 

Titel: SPY vs SPY vol II 
Computer; CBM 64, 128 
Medium/pris: forh. opgtver pris 
Betjening: Joystick 
Firma: First Star Software 
Impotor: PCS tlf 02-305488 
Quicksort ApS tlf. 01-241233 
Twilight ApS tlf. 01-880734 



Min mening (1 - 13) 

Computerbrug: 11 
Manual: 11 
Betjening: 11 
Vedvarende appel: 9 
Kelhed: 11 



KENNEDY APPROACH 

Dette er ikke et »Fast Action- spiL 
og der er ikke noget med at sla en 
masse mennesker eller robotter 
ihjel, tvaartimod. Lyder det kedeligt? 
Det er det ikke! Det er nok et af de 
bedste spil jeg har set i lang tid. Jeg 
har haft spillet i 14 dage nu, og det 
har i den grad faangstet mig, at jeg 
naasten har glemt alt 

Jeg har brugt naesten hver tedig 
time foran skaermen. Men nu til 
selve spillet. 

Du har faet et nyt job som -Flyle- 
der- i et kontrolt&rn Det er sa op til 
dig at lede lufttrafikken til, og fra 
lufthavnen eller lufthavnene sikkert. 
Du alene har ansvaret for mange 
hundreds mennesker. Kan du be- 
vare fatningen og holde til stresset. 
nar der opst4r nodsituationer? Det 
vll du i hvert fald finde ud af, hvis du 
kober dette spil. Selv om det er et 
spil, er det sa realistisk. at du sik- 
kert vil fa sved pa panden, Heldigvis 
er der mulighed for at holde en 



pause i spillet, hvis det gar for hedt af disse omrader er der 2 lufthavne. 
til. Den fordel har du ikke ude i det -Atlanta-, Georgia er den lette- 

virkellge liv. ste. der er kun en lufthavn og ingen 

Der er mulighed for at vaslge mel- 
lem 5 geografiske omrader. I visse fortsasttes side 56 1 
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Ccmal Si del 4 



af Henning Randmose 




Denne gang skal vi se naarmere 
pa WHILE/ENDWHILE, FOR/END- 
FOR/STEP, TRAP/HANDLER/END- 
TRAP, REF, CLOSED og TRAP 

ESC-. 

Programmet vi skal arbejde ud 
fra, er ogsa denne gang et talbe- 
handlings-program. Du indtaster et 
belob, og pa skaarmen far du sa ud- 
skrevet belobet, momsen af beto- 
bet sammen med en vandret sam- 
mentalt total af dit belob + morns. 
Nar du onsker at fa en lodret sam- 
mentalt total incl. moms udskrevet, 
taster du 0 (nul), og totalen bliver sa 
udskrevet nederst pa skaermen. 

Noget af det nye denne gang er, 
at der er indsat en procedure til at 
opfange fejlindtastninger. Alminde- 
ligvis mister du dine data, hvis du 
forsoger at indtaste et bogstav i en 
variabel, der er beregnet til tal. Pro- 
grammet stopper, og du far en fejl- 
meddelelse, men da den er pro- 
gramstyret. mister du ingen data 
(programmet korer stadig. det ven- 
ter kun pa at du retter fejlen). 

tNPUT saatningerne TRAP'es, da 
der er indsat en faelde beregnet til 
at opfange fforkerte indtastninger. 
HANDLER handterer din fejlindtast- 
ning, her bliver den dlrigeret hen til 
PROC fejl. Der undersoges fejlind- 
tastningen af CASE ERR OF (type 
fejl som), WHEN 206 (hvis fejlnum- 
mer 206). Hvis det er den fejitype, 
udfores henvisningerne om, hvad 
man sa onsker udfort. Hvis du i din 
Comal 80 vejledning slar op bagest 
under appendiks F. vil du se, at der 
er mange typer fejl, der kan opfan- 
ges. Du kan selv prove at saatte 
flere fejlopfangninger ind i procedu- 
ren fejl. Du vil pa side 290 se, at 
fejlnummer 206 betyder »numerisk 
konstant forvent«. Jeg kunne have 
valgt at fa udskrevet fejlmeldingen 
direkte med PRINT ERRTEXTS i 
stedet for min egen hjemmelavede 
fejlmeddelelse. Jeg har valgt selv at 
lave en. for at vise hvordan man kan 



skrive informationer til bruger i en 
fejlopfangning. 

Proceduren fejl indeholder ogsa 
to nye begreber, nemlig REF og 
CLOSED. 

CLOSED betyder lukket og i 
denne forbindelse, at proceduren 
fejl's indhold er ukendt for resten af 
programmet, og at programmet er 
ukendt for proceduren. Det kan du 
nemt afpreve, hvis du asndrer linje 
590 til linje 35 og du sa prover at 
kore programmet indtaster et bog- 
stav, sa stopper det, da bell ligger 
i systempakken, og da proceduren 
fejl er lukket, kender den ikke sy- 
stempakken. 

Den store fordel ved lukkede 
procedurer og funktioner er, at man 
ikke behover at tage hensyn til va- 
riabelnavne. Du kan have to proce- 
durer, hvor du bruger de samme 
navne til at gemme forskellige ting 
i. Blot procedureme ikke «kender» 
hinanden, beholder de deres egen 
vaerdi. Det gor de variabler ogsa, 
man overforer gennem procedure- 
hovedet, - dem man skriver i paren- 
tesen efter procedurenavnet. Hvis 
man vil aandre deres indhold, ma 
man bruge REF, der bevirker, at der 
kan returneres en asndret vserdi. 

TRAP ESC- bevirker at din stop- 
tast er sat ud af funktion. Nar du 
tasnder for din computer, har den 
opstartvaardien TRAP ESC+. Du 
kan stadig lave en RUN/STOP RE- 
STORE. Hvis du helt vil forhindre, at 
dit program kan stoppes, skal du 
lave en linje 45, hvor du skriver 
POKE 51265,1 . Nar der star et et-tal 
i denne adresse, er RESTORE-ta- 
sten sat ud af funktion. 

Med FOR/ENDFOR og WHILE/ 
ENDWHILE lokkerne, som vi bruger 
denne gang, er vi igennem de for- 
skellige lokketyper i Comal. Vi har 
brugt FOR lokken for, men uden en 
rigtig gennemgang af hvad den gor, 
det rades der bod pa denne gang. 

FOR z» «1 TO 19 DO (fra start- 
vaerdi = 1 til 19 udfor det der star 




mellem FOR og ENDFOR, (laag 1 til 
startvserdi for hvert gennemlob og 
samrnenlign hver gang med slut- 
vaardi, og nar startvaardi og slut- 
vasrdi erens, sa hop ud af lokken og 
udfor naaste programordre)). 

Hvis man ikke giver FOR-lokkens 
taeller anden besked med ordren 
STEP (trin). oges taeller altid med 1 
for hvert gennemlob. 0nsker man 
f.eks., at der skal teelles i trin af 5 
skrives det sadan: 



FOR x# =5 TO 100 STEP 5 DO 

eller med negativ teeller 

FOR x# = 100 TO 5 STEP -5 DO 



I forste eksempel lasgges der 5 til 
tsellerfor hvert gennemlob, i det an- 
det traskkes der 5 fra startvserdi for 
hvert gennemlob. 

Af hensyn til logikken i sproget, 
har man i de nye versioner af Comal 
asndret udtrykket NEXT til END- 
FOR, sa alt, undtagen REPEAT,, 
slutter med ENDxxxx. 

Nar programmet har »adgang« til 
en FOR lokke, udfores den altid, det 
sker imidlertid ikke med WHILE/ 
ENDWHILE. 

WHILE lokkens seerlige kende- 
tegn er. at man slet ikke kommer ind 
i den, hvis ikke udsagnet til lokkens 
hoved er sand. Du husker sikkert, at 
i REPEAT/UNTIL star udgangsbe- 
tingelsen i sidste linje, i LOOP/ 
EXIT/ENDLOOP kan udgangen 
EXIT placeres hvor det onskes, men 
i dem alle kommer man -indenfor 
doren«, modsat med WHILE, hvis 
ikke -noglen passer I doren« kom- 
mer man ikke ind. Det har den for- 
del, at programmet korer hurtigere, 
det kommer jo ikke ind, og laser pa 
indholdet mellem WHILE/ENDW- 
HILE. 

Den forste betingelse er, at belob 



fortsaettes side 60 ► 
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OOID udikr ivir be 1 ab , moms, bel»b 

rn/mo ml 

CQ20 // den I0/10-19S3. Henn ing Randmose 
0030 

00«0 TR*=tP ESC- 
OOSO PAGE 
0060 TRftP 

0070 INPUT ft T 12,1,21 -indtas* momsX 

som hel-tal C 22 ) : m 

O08O HANDLER 

O09O <f«JKm> 

0I0O E«JTRrtP 

01 ID PAGE 

0120 ti =0; pHi -3 

0130 PRINT ""ie" b«l*b rooms 

belab mad moms "146"", 
0110 fctreg 

0150 PRINT AT 25, 2t ""IS-max 8 cifre, 

moms-X ".m/IOO,", 0»stop "1$6""* 

OISO Indtast 
0170 UHILE belob)0 DO 
018O s i =belob«< ra/100 ) 
st t =be 1 ob «s 
•t : «t +st 
CURSOR p«,0 

PRINT USING "NHttHHHHit.HN 
iikmnwmm . MM rt M M rt rt W it H H . MM ■ ! belob,s,st 
0230 pttl*l 

UHILE p«*22 00 
CURSOR 3,0 
FOR i*i*l TO 19 00 

PRINT SPC«< 39 ) 
ENDFOR 2*4 
pMf -3 
ENDUiH ILE 
i ndt as t 
0320 ErCUH ILE 
0330 CURSOR 22/, 1 
0340 slreg 

0350 PRINT UBINQ "total Incl. 

moms kr.MMMMMUMMM'M.MM-i t 

03S0 PRINT TflB(2).""I8" tryk tn 

taste *or slut " 
0370 pkUit 
0380 PAGE 

0390 Er-E "tast RUN tor at start* isien" 
OflOO 

0410 PROC ftrtg CLOSED 
0420 PRINT 



0190 
0200 
0210 
0220 



O240 
0250 
0260 
0270 
028O 
0290 
O30O 
0310 



0-1 30 
044O 
045O 
04GO 

04 70 

oieo 

0430 
0300 

05 lO 
058O 
• xc I . 
0530 
054O 
0550 
05SO 
0370 
0580 
0590 
060O 

oeio 

0S20 
0630 
0S40 
tal , 
0S5O 
06GO 
0S7O 
OGBO 



ENOPROC streo 

PROC pause CLOSED 

WHILE KEY«-"0"" DO NULL 
ENOPROC p«ui« 

PROC indtast 

PRINT «T 23,2?r SPCK IS> 
TRAP 

INPUT ftT 23,1.11' -indtast b*lob 
moms J " * be 1 ob 
HflnCLER 

fijH belcb » 
ENOTRAP 
EhDPROC (ndtast 

PROC feJKREF bfilob) CLOSEO 
USE xysttn 
CASE ERR OF 
WHEN 20S 

PRINT AT 23,271 SPC*I2> 
b«lKSS> 

INPUT AT 23, I . 1 1 i "*ejll tas* 
os> «J andeti *l nytbelob 
bel ob i =nytb*loti 
ENDCASE 
ENDPROC -fejl 




Bestseller b» alle DATA-BECKER bo 
gerne En samllng af ho| karat i ve|> 
ledninger at fiemskreden program 
merlng af -ftjkes" og andfe nyllige 
fuimer Af mdholdet. 3 dimensions' 
grallk i BASiC-Si mull al ion at musen 
m.v. JOYSTICK-synteser I stereo 
overtorsei af info tra og III andre 
regneenhsderog meget mere 
En guldgrube for den dor brugor 
C 128 



Kr. 248,00 



Udkommerpa DANSK cad 1-12.- 85 



128 INTERN udkommcr p& DANSK ca 



KATALOG Righoldigt • over 100 

boger og programmer • Sporg hos 
din forhandler eller send 5kr. 

7 Data Becker handboger oversat til 

engelSk 64 INTERN tn. 2 dia. 

All om tekmk. Drugssyitemflf Of) 
avanceiel ptogiamme*ing al C&4 
Med odfitflig BOMUsi ing. omnygoo 
lig dokumente>ei diagram til at lolde 
.j.j. talrige iilusiraliorter. diagram 
me* Biodomgrainmef og naiorligvia 
med allraWrve programmer Mod 
(lenne uundv,vrlige Dog '<e<e* D« 
(oral ngtig Oeies C64 at kendo 

MASKINSPROG I 
MASKINSPROG II 
IDEBOGEN til 64 
TIPS OG TRICKS I 
GRARKBOGEN 



FLOPPY-bogen. store 

Dtsketle&tation *5*1 Alt om fltsket 
leprograrrtmenng fni tiogynclef ID 
pio'essionel Foruden giundlicg 
gende infotmstion om DOS. om ay 
•lemkommandoer og fejimddlngor. 
bi dc flflr# Hapltlei om praktish an 
■endelu og behanannd Bi aisttlle- 
opbevarede hsnoiehBr. inlornalion 
m* Omfangsng dohumoiiteret 
DOS I'Stetwing. nam! en guldgruOe 
al lorsheliigsla nrogrammer og 
nisiperuliner som naston gor do 
gen 111 oligtieKium Udgivei l om 
75000 akssmplsfQr 





NORDIC COMPUTER SOFTWARE 

POSTBOX 105 ■ DK 6950 RINGK0BING 

Enelmoorter for de 5 nordlske lande. 
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I nummer otte beska?ftigede vi 
os med et lillc program, der kan 
styre kassettestationens motor. 
Vi kom der fnd pa en raekke 
tnteressante adresser i den 
sakaldte zeropage. Denne gang 
skal vi videre pa vor fodtur 
gennem zeropage n, og det skal 
nok bllve til et par interessante 
ophold fndervejs. 



128'EREN 

BIT for BIT 




af Flemming Lerbaak 



t programmet »Kvikfind«, som jeg 
praasenterede i nummer otte, blev 
der visl en raekke fikse losninger pa 
ret almindelige programmerings- 
problemer. Imidlertid var et par be- 
stemte linjer helt igennem Basic af 
den gode gamle slags. 

De lyder; 



PRINT-CLR/HOME" ;CHR$(17) ; 
CHR$(17);CHR$(17);"SAVE"; 
CHR${34);N$<J);CHR$(34); 
CHR$(34);CHR$(19) 



samt en tilsvarende med "LOAD" 
og en linje mere 

POKE208.1 :POKE842,13:END 



Der findes en bedre made at lave 
disse linjer pa. Som man kan se, er 
linjeteengden betydelig, og truer 
med at ga ud over det tilladte antal 
tegn. Noglen til det hele er sadan 
set den samme, nemlig tastaturbuf- 
feren, der starter p£ adressen 842. 
Vi kan \ stedet POKE ASC-vaer- 
dierne af et kommandoord ind i buf- 
feren sadan: 



10 POKE 842,ASC("S"):POKE 

843.ASC("A") 

POKE 844,ASC("V"): 

POKE 845,ASC("E") 

20 POKE 846.5:POKE208.5:END 



Alle kommandoer kan pa denne 
made, genereres under programaf- 



vikiingen, blot skal man huske at 
lave om pa den veerdi, der indlaases 
i zeropage 208. Den skal svare til 
tengden af ordet og RETURN (13). 
altsa i dette tilfaslde 5. Tallet angiver, 
hvor mange tegn. der ved nsest 
givne lejlighed skal udtasses fra ta- 
statur-bufferen. 

Husk at forkortelserne for Basic- 
kommandoerne kan bruges. og at 
buffren kan forlaanges som beskre- 
vet i RUN nr. 8. 

Zeropage 45 

Ofte har man brug for at vide, hvor 
ens Basic-program egentlig stuves 
af vejen i computerens byte-jungle. 
Ikke mindst. nar man har sA mange 
bytes til sin radighed som i 
128'eren. Men som naavnri sidste 
nummer. findes der forskellige sa- 
kaldte banks, som computeren ar- 
bejder med. Dels fordi den med en 
otte-bit CPU'er ikke kan adressere 
mere end 64Kbyte, men lige sa me- 
get fordi den ud over de relativt 
mange RAM skal adressere et stort 
antal ROM-adresser. Til denne 
fasrdselsbetjentopgave har Com- 
modore udviklet en ny chip, der 
ogsa bruges i 64-mode, Den kaldes 
MMU, der er en forkortelse for Me- 
mory Management Unit, og bserer 
IC-nummeret 8722. Denne chip og 
dens registre kan udnyttes pi me- 
get interessant vis. men det vender 
vi tilbage til en anden gang. 

Grunden til. at MMU'en overho- 
vedet nasvnes er, at vi endnu en- 
gang stodte pa begrebet BANK, og 
disse skift mellem de teoretisk fire 
bank's styres via MMU'en, 

Jeg skriver teoretisk fire banks, 
idet der - indtil man far fat i den 



RAM-udvidelse pa 128K, som 
endnu mangier at blive preesenteret 
fra Commodore - kun er adgang til 
2 banks, nemlig nummer 0 og 1 . Ba- 
sic gemmes i bank 0 og, som vi 
ogsS nsevnte sidst, gemmes variab- 
lerne i bank 1. Men nu tilbage til 
zeropage 45 og 46. 

I den gode gamle C64'er var Ba- 
sic-startadresserne gemt i zero- 
page 43 og 44. I 128'eren er de at 
finde pa adresserne 45 og 46. De 
gemmer p4 HI/LOW format begyn- 
delsesadresserne, dvs. at man i 
adresse 45 finder et tal, som kaldes 
hi-byte. Dette tal ganges med 256, 
og dertil lasgges indholdet af adres- 
sen 46. den sSkaldte low-byte. Det 
ser saledes ud. nar man vil finde ud 
af begyndelsesadressen: 




Nu kan det jo vaare. at man ogsS 
onskede at skubbe basic-starten til 
en anden position - stadig i bank 0 
- og det kan disse to adresser ogs5 
anvendes til: 



POKE45,low:POKE46.high:POKE 
(low+256*high)-1.0.NEW 



Linjen skrives I direkte mode, og 
vserdierne low og high findes ud fra: 
high = INT(onskede adresse/256) 
low = onskede adresse-(256*high) 

Desvaerre forsvinder det basic- 
program, man evt. har i hukommel^ 
sen, nar man foretager en s&dan 
manuel indtastning af basic-start- 
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vaerdierne, men det gor variabel- 
vasrdierne ikke. for de befinder sig 
i en anden bank, nemlig bank 1. 

Men fat mod! Der er en retativ let 
metode til ogsfi at komme udenom 
dette problem. Maske har du alle- 
rede set et OLD-program til en 
64'er. De er meget gode at have, 
hvis man en sen time af ren og skser 
trsethed - eller hvad grunden nu kan 
vasre - er kommet til at slette sit 
program. OLD indtastes efterfulgt 
af en RETURN, og man er igen pa 
rette vej. OLD-programmerne gor 
samaend heller ikke sa. megen ho- 
kus pokus. De ssetter blot nogle po- 
intere til de gamle vaerdier - de vser- 
dier, man netop slettede med NEW. 
Med 128'eren er det endnu nem- 
mere. Her er opskriften pa et effek- 
tivt program, som genskaber poin- 
terne til basic-starten: 



POKE PEEK(45)+256*PEEK(46)- 
1.28:SYS DEC{"4f4f") 



Naturligvis ma man ikke i mellem- 
tiden have forsogt sig med andre 
programmer/programlinjer. Oven- 
staende ska) indgives i direkte 
mode. 

Der findes imidlertid ogsa en me- 
get fiks lille maskinrutine, som man 
med den indbyggede monitor me- 
get let kan finde et sted at anbringe. 
F.eks. i den meget store kassette- 
buffer, som findes pa 128'eren. Den 
findes i adressen (Dec) 2816 til 
3071. 64'erens kassettebuffer fin- 
des pa 828-1019. Kassettebufferen 
er et fint sted til selv relativt lange 
maskinkodeprogrammer med over 
250 bytes leengde. 

Her er programmed 



0B00 AO 01 ; Y registeret lades med 
1 

0BO2 A9 1 C ; A registeret lades med 
28 

0BO4 91 2D; som overfores til high- 
byte i Unk-rutinen 
0BO6 20 4F 4F; en ny beregning i 
Link-rutinen 
0BO9 60; og tilbage 



Rutinen kaldes med BANK 0 (re- 
turn) og SYS 2816 (return). Denne 
rutine fungerer bade efter reset el- 



ler hvis du har torandret basic-star- 
tadressen, og det var netop det pro- 
blem, vi kom fra. Rutinen »snyder« 
altsa 128'eren til at tro, at der star 
nogle vaardier i Link-rutinen. Her er 
valgt basic-start adressen. som den 
normalt er, men det kan vaere en 
anden vasrdi. blot ikke 0 (0 er den 
vaardi, NEW indssetter i rutinen). 
Derefter beregnes LINK pany, og 
den rigtige vserdi kornmer til at sta 
i adresserne 45 og 46. 

Zeropage 4624 

Det lyder maske tosset at kalde ad- 
ressen 4624 for zeropage, men som 
vJ var inde pa sidste gang, er begre- 
bet zeropage forseldet. idet man i 
dag slet ikke kan klare sig med 256 
bytes til alle de systemoperationer, 
moderne computere skal kunne ud- 
fore - og slet ikke 128'eren med 
dens avancerede basic 7.0 osv. 

Lige for beskaeftigede vi os med 
basic-programstarten. Lad os sa 
lige snuppe basic-programslutnin- 
gen, der findes pa ganske tilsva- 
rende made som starten, men nu 
ved hjaelp af adresserne 4624 og 
4625. Det giver os folgende linje: 



PRINT PEEKI4624) * 256-PEEK{4625) 



Og straks toner basic-programs- 
lutningen frem. og nar vi nu har slut- 
ningen og kender starten, kan vi 
regne os frem til programmets no|- 
agtige lse-ng.de. 

Zeropage 47 

Vi kunne tidligere i artiklen Isese om 
variablerne, og at de var stuvet bort 
i Bank 1 modsat basic-programmet, 
som blev gemt i Bank 0. Netop fordi 
disse to enheder ligger i hver sin 
bank, slettes variablerne ikke, nar et 
program i ovrigt fjernes fra huko- 
melsen. 

Med helt de samme hjaelpemidler 
som ovenfor anfort, altsa f.eks. va- 
riablernes start-adresse udregnet 
som 



PRINT PEEK(47)+256'PEEK(48> 



kan man fa fundet den nojagtige 
plads, som variablerne optager i hu- 
kommelsen. Det var alt for denne 
gang, men vi vender tilbage i det 
nye fir. ■ 




K ob for op til 1 5 .000,00 
UDEN UDB ETA LING! 

COMMODORE 

HARDWARE 

PCM 28 PA LAGER' dk's faveste dagspris 

C-64 JUUETILBUP 1995,- 

C-1541 dlskst JULET1LBUD 2895.- 

C-157Qdiskst.Gapris 3595,- 

C-1571 disksMev.januar 3995,- 

MPS601 printer 1995,- 

MPS 802 printer 2995,- 

DPS 1 1 20 typehjulsprinter 4995,- 

1 702 FARVE monitor 2995,- 

PMILIPS grofl el. ambra 1280,- 

C64 & 1 541 samlet tilbud 4845,- 

1 531 datassette NU-PRIS. Kontant 345.- 
Seikosha SP- 1 000 VC 1 00 cps/NLQ 
saarltg Commodore udgave 4895,- 

SOFTWARE 

COMAL 80 V2.01 (dennye) 875,- 

Easy Script pa Dansk 545,- 

Winter Games (disk) 225,- 

Fede spil 4 boger - ring vi har ALT! 

TILBEH0R 

1541 TURBO-DRIVER 

tar din 1541 tilatkore 20 gange hurtigere I 
Loader 220 btokke pa UNDER 7.5 SEKUN- 
DER! Forfang specialbrochure. 

Monteret 985,- 

Umonteret 945.- 

MUS incl. tegneprogram! 825,- 

COMPETITION PRO 5000 Joystick. 265.- 

THE ARCADE professioneit Joystik. 245,- 

MICROSTICK m, Mlcraswitches. 19B,- 

Centronics interface 795,- 

3M disketter - hvorfor kobo atfa I dsdi skelter 
nar enhver ved, al 3M er suvercent bedst? 
Vejl. 434,- - hQS R.B. 1 0 stk . KUN . . , 275,- 
OBS! Kob 20 3M disketter og fa en gratis 
-Post-It- dispenser nVblok med ihobel! 

Vi har selvtolgellg ogsa alt i kabler, papir, 
formularer farveband etc. - ring! 

Der ydes ET ARS GARANTI pa alle varerf 
Vi sender/bringer overran fra dag-til-dagl 
Priserne er incl. 22% moms 
Forlang specialbrochurerl 

Danmarks Forende Mikroekspertl 



Posttooks 28 - 2980 Kokkedal (02) 24 26 58 
Ma-so kl. 8.00 til 22.00 



GRAFIK MED COMAL 80 

Dette er bogen for matematiklse- 
reren, der gerne vil udnytte compu- 
teren lil stolte for sin undervisning. 
Det er ogs5 den rigtige bog for dem. 
der gerne vil arbe|de med grafik, 
men den er mere end det, det er 
ogsa en glimrende bog for nybe- 
gynderen. 

Bogen er opbyggef i fire hoved- 
kapitler Det forste er en indforing i 
programrneringssproget Comal 80, 
hvor man ved hjeelp af grafik leerer 
om programmeringssammen- 
haenge. Det nseste kapttal omhand- 
ler to-dimensionel grafik, og eks- 
emplerne gor. at selv om man ikke 
er helt sliv i matematikken, sa kan 
man godt finde ud af det alligevel. I 
kapitel 4 arbejdes der videre med 
tre-dimensionel grafik. 

Bogen er ogsa virkelig god for 
dem, der ikke helt ved. hvad potygo- 
ner, vektorer, sinus, cosinus, koor- 
dinater og rumgeometri er, for alt 
dette plus meget mere kan omsast- 



tes til synlige ting ved hjaelp af de 
lislede programmer. Hele bogen er 




bygget over Isesten »se og for- 
sta«og ikke som normalt »lass og 
forsta*. 



Jeg har provet at taste nogle af 
de listede programmer ind og kort 
dem - de virker - og man far virkelig 
flot grafik frem pa skaermen. 

Programlistningerne er i Unico- 
mal til Commodore 64. men bogen 
indeholder ogsa anvisninger pa, 
hvordan man kan fa dem til at kore 
i andre Comal versioner. 

Konklusion - et virkeligt godt 
kob, der holder mere end der loves. 

Titel: Grafik med Comal 80 
Forfatter: Leo Hojsholt Poulsen 
Forlag: Teknisk Forlag A/S 
Ca. pris: kr. 195,00 



COMAL 

En anderledes Comal bog, Den 
adskiller sig fra andre boger, der er 
skrevet, ved mere at vasre en (af 
mange savnet) handbog iforskellen 
mellem de forskellige versioner. 



KONTO UDEN UDBETALING 



En 1 28K computer, med an& mullghederoe indbygge i Ved hjaelp -at 2 proces 
sorer er dot muligi at la 1 M'eren ui ai optrasde som en Commodore 64 , som 
CP/M computer og naturligvis som Commodore 1 28 Med rnuligtved (or tit ko- 
>e ett eksistetende 64 software, et C 128 toot ssertc. Da den ogsa kan kore 
CP/M 3.0, vil Commodore 1 28 ogsa vasre velegnet til at lose administrative 
opgaver med Wordstar. Muiuptan, Dosse. Perfect Wnter. Pertect calc. Per- 
fect Met. Perfect spetfet. software serien JANE, samt andre CP/M tosnmgei. 
Commodores slanko PC took lover ikke lor meoot. Tastaturei er elegant Ind- 
• med logisk opdeling af tasteme. hvilkei gor den vetognoi til lane, lids 
Drug, leks tekstbehandling eliei storre latopgaver. 
Commodore 1 28's Baste 7.5 er en Ural Itg lorbednng af version 2,0 og DyOer pa 
virk.eligt mange tacilrteter. fjette gaslder struktur, graf*. lyd/musik, og funk- 
ttonskommandoer. Derudovrei del nye DOS og on rsokke rijaJlpefunktionei 
De nye graflske kommanooet giver ot.a muliQheO lor kottrslona detect. Ind- 
Dyggat sprite designer, skaarm vlnduer, load/save sprites og meget andet 
Skiermen kan opdeles som kombineret loksi'gral* lormat. leksl formal 40/ 
BO tegn. grafik skasrm. all altuangigt at behov. 

Til Commodore 128 er der ogsa muttghea for Dlsiutnlng et CP/M dlsKetto- 
stal»n, monrtor/rv. printer, modem, joystick, cartridge. e*tem RAM udvtdel- 
se til 51 2K, kamera og mange andre tacihteier. 
Commodore 128, en tavende computer u protessioneii og hobby brug. 
RekvBor vor specialbrochure tor yderligere optysntnger 



COMMODORE 128 



Ekstra tllbehor. 
ring for prts 
1571 Dlskettedrev 
1902 Monitor 
Mus 
Modem 



ca. kr. 4.495. 

ca. pr. md. 300,- 




GRATIS PRISLISTE 



Navn_ 



Adresse_ 
PoStnf. - 



By- 



Datamat 

Onsker yderligere information pa: 



RmJ^Disket 
Por. md. k 



Commodore VIC 1541 



kr. 



2.895.- 



pr. md. kr. 200.- 
Commodore MPS 802 

printer « QQC. 

pr. md, kr, 200, • «• ^ • ^ ^ **■ 



Commodore C-64 

Dalamat -| QQC . 

pr.md.kr.2QQ.-* T - 
Commodore 1702 

monitor , n OOC . 

pr.md.kr.2O0.-"-*' 11135 - 



SPECTRUM 



r 



HostrupveJ 2 - 1950 Frederlksberg C 
Hoved vejen 56 - 2600 Glostrup 



Tlf. 01-37 22 81 
TU. 02-96 43 44 



- Alle priser 
incl. 22% moms 

EXPORT 

alie exportsalg 
overki 1000- 
tratraBkkes moms. 



Det er ikke en bog. jeg vil anbe- 
fale en nybegynder. derimod vil jeg 
ikke love med al anbefale den til 
alle , der har brug for at arbejde med 
den forvirrende blanding af compu- 
termasrker og meerkeafhasngige 
Comal sprog, der findes rundt om 
pa vore skoler. Med denne bog i 
handen kan man rimeligvis finde 
den syntaks. som netop den com- 
puter, man arbejder med. forstar. 

Jeg vil spa bogen en stor fremtid 
som handbog for leerere (folke- 
skole. gymnasie og aftenskole), 
plus alle andre, der har brug for at 
arbejde med forskellige computere 
og forskellige udgaver af Comal. 

Titel: Comal 
Formatter: Lars Persson 
Forlag: DATATID 
Pris; kr. 128.00 




De forste boger til en ny computer 
pakalder sig altid nybedens Inter- 
esse. 

Ovennasvnte bog forklarer i det 
store hele blot brugervejledningen 
pa en lettere tilgaengelig made. Det 
er bogen for forste-gangs bruge- 
ren, der foler sig pa glatis. 

Brugeren. der er vokset fra sin 
C64'er kan Ikke hente meget her. 
Det er formentlig heller ikke forma- 
let , sa konklusionen ma vaare, at her 
er tale om en god begynderbog. 
hvis man er nogenlunde dus med 
engelsk. 

Titel: The Official Book for the Com- 
modore 128 

Forfatter: Waite/Lafore/Volpe 
Forlag: Howard Sams 
Pris: kr. 226.00 



pan , m 
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carets julegcwe 



af Flemming Lerbaek 



Jeg er ikke i tvivl om. at dette 
ars julegave til Commodores com- 
puters ikke kommer fra Commo- 
dore, men fra Japans forende prin- 
terfabrik OKI Electric Industry, der 
ogsa laver Microlineprinterne. Og 
gaven - ja, det er OKIMATE 20 far- 
veprinter. 

Om korl tid vil Okimate 20 dukke 
op i forretningerne. men her pa 
RUM har vl langtidslestet den. Den 
har fungerel uden vrovl siden ja- 
nuar. 

Endelig er det modul, som vl om- 
talte i vor artlkel om Okimate 20 i 
RUN nr 5, komrnet. Og hvilken let- 
telse. Alt fungerer nu, som var det 
en printer fra Commodore med de 
features, denne printer bar. Men her 
tar man langt mere for sine penge 
Pnnteren vil blive solgt til en pris pa 
mellem 2.500 og 3.Q00 kroner i ud- 
salg, og den skriver60 tegn i sekun- 
det ved almindelig skrifttype og 40 
tegn i sekundet med skonskrifts- 

kvaJitet 

I ren Commodore stil printes 
med f.eks. dobbelt bredde.. almin- 
delig bredde eller negativ. Der kan 
understreges og skiftes mellem 
Pica, Elite og condensed. Op til 132 
karakterer pr. liinje i den mindste 
sknftstorrelse condensed. 

Okimate 20 kan mere endnu. Den 
har Italic, altsa det vi kalder kursiv. 




Den kan skrive over- og under linjer 
og har fine muligheder for tabule- 
ring i bade hojde og bredde 

Farve-eventyr 

Og sa kan den noget. som de fasr- 
reste printere kan i dag. Den kan 
printe i farver - mere end 100 nuan- 
cer kan den frembringe. Se illustra- 
tionen. 

Dens grafiske formaen gax fra 
60x144 punkterpr. kvadrattomme til 
120x144 punkter. 




Farverne fremstilles med et far- 
veband i en kassette. Det gar hen 
over et givent sted tre gange, og pa 
denne made sammensaettes far- 
verne ud fra de tre grundfarver Re- 
sultatet er, som det ses. utroligtflot. 
Det tager normal! mellem fern og ti 
minutter at udprinte en illustration. 
Et farveband stra?kker til ca. ti 
skasrmdumps. De sorte farveband 
straakker til ca. 75 A4 sider. 

Jeg tror, det bliver en utrolig 
sajgssucces. Dens features er langt 
overlegne i forhold til konkurren- 
terne, og prisen er lavere. Den ar- 
bejder nassten lydlast. kun printer- 
hovedets anlseg mod siden hores, 
altsa en gang pr. linje. Den kan des- 
uden arbejde pa termopapir, altsa 
uden farveband. 
Navn: Okimate 20 
Importer: Technitron, Albertslund 
Pris: ca. 2.500 - 3.000 kr. 
Priser pa farveband: 

Farve: kr. 51,00 

Sort: kr. 49,00 
Papir; 500 stk. kr. 235,00 (man kan 
bruge almindeligt papir) 
Pnnterhoved: kr. 180.00 



18 



INPUT/OUTPUT 



af Tor Engebakken 




INPUT/OUTPUT er RUNs laser- 
brevkasse, hvordu har mu lighed for 
at fa svar pa nogle af de problemer, 
du garog tumler med. 

Desvaerre kan vi ikke na at besva- 
re alle de breve, vl modtager. Vi 
prover at fa sa mange med som mu- 
ligt og udvselger dem, vi mener, der 
har bredest irtteresse. 

Cornmodore-interesserede, som 

har sporgsmal eller tips at bidrage 
med, ken skrive til Tor Engebakken, 
Brandvoldgatan 1,2000 Lilies trom. 
NORGE. 



Problemer med Interrupten 
INPUT 

Hej RUN 

Hvordan fSr /eg nedenstAende in- 
terruptrutine til at kore ordentlig, 
siiedes at jeg kan bruge den sam- 
men med BASIC? 



*0314 

«*CO 

$0315 



COOO 78 SEI 

COO I A3 OD LDA 

C003 8D 14 03 STA 

COOS A9 CO LDA 

COOS 8D 15 03 STA 

COOB 58 CLI 

COOC 60 RTS 

COOO EE 20 DO INC 

CO 10 GO RTS 

PA forhAnd tak 
CJaus Brinch Jensen 
Kaarbyvej 7 
5466 Asperup 



OUTPUT 

En interruptrutine kan ikke afsluttes 
med den saedvanlige RTS. Na/ en 
6502-processor far en interrupt, vil 
den heme startadressen af inter- 
rupt-rutinen fra adresserne $FFFE 
og SFFFF. I CBM-64 er denne 
adresse sat til SFF48. Hvis du disas- 
sembler programmet, som ligger 
der, vil du se, at rutinen forst lagrer 
indholdet i de forskellige registre pa 



slacken, og derefler hopper videre 
gennem vektoren i S0314-S0315. 
NaT rutinen er faerdig med det, den 
skal gore, ma den hente de forskel- 
lige registervaaredier tilbage, for 
den returnerer fra interrupten. En 
korrekt made at afslutte en interrupt 
pa, vil derfor vaere: 



C010 
CO 1 I 
CO 1 2 
CO 13 
CO 14 
CO 15 



68 
A8 
€8 
AA 
68 
40 



PLA 
TAY 
PLA 
TAX 
PLA 
RT1 



Dette er imidtertid ikke vaere til- 
strsekkeligt for os. Den normale in- 
terrupt tager sig af alt. hvad der har 
med aflassning af tastatur at gore, 
cursorblink osv. For at kunne fort- 
saatte med at bruge maskinen som 
for, ma vi derfor enten selv skrive en 
rutine. eller gore brug af den. som 
allerede findes i maskinen. Det sid- 
ste alternate er selvfolgelig det let- 
teste, og dit program vil derfor virke 
tint med denne tilfojelse. 

C010 4C 31 EA JMP «EA31 




Hvad er ASCII? 



INPUT 

Hej Tor 

Jeg har en 16'er. og jeg spekuferer 

pa. hvordan man bruger ASCII og 

CHRS-koder? 

Tak for et godt btadll! 

Hi/sen 

Henrik Neuendam 
Sorupsvang 19 
3300 Frederiksvasrk 



OUTPUT 

ASCII star for "American Standard 
Code for Information Interchange*'. 
Ud fra dette skulle man tro, at der 
var tale om en eller anden form for 
standard, og det er det da ogsa, om 
end med nogle 
modtfikationer. 

En standard er selvfolgelig uhyre 
vigtig. Nar du sender programmer 
eller tekst over modem, er det jo i 
realiteten kun tal, som bliver sendt. 

Det er derfor belt nodvendigt, at 
have en bestemt made at tolke 
disse tal pa. 

Som du ved, kan man ikke lagre 
andet end tal i maskinen, men alli- 
gevel kan du udskrive bade alfabe- 
tet og hel del andre karakterer. Det 
er netop det. som ASCII gar ud pa 
ASCII-tabellen er en tabei, som ma- 
skinen kan sla op i for at kunne vide, 
hvad slags bogstav eller tegn, den 
har med at gore. Nar maskinen 
kommer over tallet 65. kan delte be- 
tyde en hel del forskellige ting, men 
i det ojeblik den far besked pa at 
behandle dette tal som en karakter, 
ved den, at den har med et »A« at 
gore. 

CHRS er det -modsatte- af 
ASCII. Mens vi kan f inde ASC ll-vaar^ 
dien til f.eks. et bogstav, kan vi ogsa 
finde ud af, hvilket bogstav, der sva- 
rer til tallet 82. 

Ved at skrive PRINT CHRS(82) 
skulle du fa et »R« frem pa skaer- 
men. Det modsatte ville vcere PRINT 
ASC<"R"). som vUle give dig taMet 
82. 

Der er mange ting, du kan bruge 
dette til. men du kan jo prove at 
udskrive alfabetet pa. denne made: 

10 FORI =65T090:PBINTASC(I- 
)::NEXT 

eller for et hell legnseet 

10 FORI = 0TO255:PRINTASC(l- 
5;:NEXT 
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Auto run og fjernelse af 
directory 



INPUT 

Jeg er 14 ar, og jeg har nogle 
sporgsma'l, jeg b&ber, du kan svare 
pi. ~ 

1) Hvordan laver man en komplice- 
ret AUTO-RUN? 

2) Hvordan ffernerman directory fra 
disketten? 

Pa forhind tak. 

Hilsen 

Sune Trudslev 
Kildebakken 43 
2860 Soborg 



OUTPUT 

1 ) Hvorfor i alverden skal det dog 
vaare kompliceret? 

Selv om dette tips har staet her i 
spalten for. tager vi det alligevel 
med endnu engang. Det er kommet 
utrotig mange sporgsmal om netop 
dette! 

Kor forst dette program: 
10 B = 679 

20 READA:IFA< > -1THEN POKE- 

B.A:B = B + 1 :GOTO20 

30 

DATA169.131. 141,2.3.169.164,141 
40 DATA3.3.32.142,166.76 I 174,167 

Derefter loader du det program, du 
skal lave AUTO-RUN pa. 

Sa skriver du Tolgende pa tasta- 
turet: 

POKE43,167:POKE44,2 (return) 

Det neeste skal skrives pa en linje! 

POKE770.167:POKE771,2:SAVE- 
"program" .8 (return) 

Prog ram met vil nu blive gemt pa di- 
sketten. og for at loade det igen, 
skal du skrive: 

LOAD "program".8,1 

Programmet vil sa starte af sig selv, 

2) Du kunne jo formattere disket- 
ten? 

Hvis du derimod tasnker pa. hvor- 



dan du kan forhindre, at rcogen fin- 
der ud af, hvad der ligger pa disket- 
ten, kunne du jo Indssette et tegn. 
som ikke lader sig liste. Program- 
met nedenlor lasgger en SHIFT/L pa 
den plads, hvor ID'en plejer at ligge. 
Nar du sa loader directoryen ind, vil 
du ikke kunne udiisie den. Pro- 
grammerne kan selvfolgelig loades 
og kores pa saedvanlig made. 

100 TR=18:SE = 0:PO=162:A = 
204 

:REM Track/Sektor/ID-pos/SHIFT- 
L 

110 OPEN15.8.15 
120 OPEN5.8,5."# 
130 PRINT* 15,»U1»5:0;TR;SE 
REM Indlses spor 18 sektor 0 i buf- 
fer 5 

140 PRINTS 15,"B-P":PO 
REM Sast bufferpeger til position 
for ID 

150 PRINT#5.CHR$(A); 
:REM Skriv SHIFT-L ind i buffer 
160 PRINT»15."U2"5:0:TR;SE 
170 CLOSES 

180 CLOSE15 

En anden mSde er vist i programmet 
••LINKER". 

Directory ligger jo i spor 18. Den 
forste sektor med programnavn er 
spor 18 sektor 1. De to forste bytes 
i denne sektor er nasste spor og 
sektor. Hvis disse to bytes er 0 og 
255 vil det vsere sidste sektor i di- 
rectory. 

Det . vi kan gore . er at lade denne 
sidste sektor pege tilbage til den 
forste. Dette vil fore til. at directory 
i praksis bliver uendelig. og umulig 
at laase ind. Det samme vil vaere til- 
fceldet. hvis du prover at loade en fil, 
som ikke findes pa disketten. 

-UNLINK- er et program, som 
abner en diskette, der er spaarret pa 
denne made. 

Vser lidt forsigtig, nar du bruger 
et af disse programmer. Hvis det 
ikke er tastet helt nojagtigt ind, kan 
du hurtigt odetegge din diskette. 
Det er trods alt directory, som inde- 
holder alle informationer om disket- 
ten. og man kan hurtigt lave en fejl! 
Prov dig frem pa en diskette, som 
ikke indeholder noget vaerdifuldt! 




Load directory 



INPUT 

Forst mange tak for jeres udmser- 
kede blad. som jeg har haft megen 
gavn af. Jeg spekulerer pa\ hvordan 
jeg kan loade indholdsfortegnelsen 
fra disketten uden at slette pro- 
grammet f computeren? 

Med venlig hilsen 
Jorgen H. Pedersen 
Smorumsvej 72 



OUTPUT 

Det er ikke noget problem at loade 
directory ind i computeren. men det 
mS gores i maskinkode, hvis den 
ikke skal havne i BASIC-omradet. 
Nar du abner en fil (SETLFS) med 
Y-registeret ligO, vil programmet lo- 
ade sig ind i den adresse, som lig- 
ger i x- og y-registeret, nar du kal- 
der LOAD-rutinen (SFFD5). Navnet 
sastter du lig med et dollartegn ved- 
hjselp af SETNAM (se Reference 
Guide for nsermere forklaring af 
disse rutiner). 

ProbSemet opstar, nar du skal 
have skrevet det ud igen. 

Nar du loader directory pa saad- 
vanlig made, vil den blive loadet ind 
som et program med alt, hvad det 
indebeerer. Du ma derfor vide, hvor- 
dan et program ser ud. 

De to forste bytes er en -Hink", 
som fortfflller os, hvor nasste pro- 
grarnlinje begynder. I vort tilfaelde 
behover vi ikke at bekymre os om 
det. De to nseste bytes er normal! 
linjenummeret, men i directory bli- 
ver disse brugt til at angive, hvor 
mange blokke filen bestaraf. Deref- 
ter lolger selve filnavnet. Heldigvis 
indeholder dette ikke nogen be- 
stemte koder, og kan skrives ud 
som almindelig tekst. Navnet afslut- 
tes med et nul som en almindelig 
Basic-linje. Nar vi finder dette nul, 
ma vi udsende en return, saledes at 
alt ikke bliver skrevet lige efter hin- 
anden. 

Saledes fortsaatter vi til hele di- 
rectory er faardigudskrevet pa 
sksermea Vi finder slulningen pa di- 
rectory ved at highhyte i sidste 
-link- er nul. 

Og hermed vil jeg onske alle 
RUN's laasere en glasdelig jul og et 
godt nytar. 
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INPUT/OUTPUT - LINKED 



INPUT^OUTPUT - UNUMK 



100 Tff=l8:££sl 
110 DPEN1S ,8.15 
120 OPENS, 9. 5. "» 

130 Pf?lNT«lS."Ul-5;B;T(?;SE:PRJNTTR.£E:f?E 
H LES INN F0RSTE TRflCK/^ECTOR 
11B GETaS.TRi: ]FTRi = -' THENTRl = CHf«4CBJ:RE 
H HENT NESTE TRACK 

150 ceT»5.SEi:IFS£i=""THENSEi=CHRiC0 J: RE 
n H6NT NESTE SECTOR 

160 NT=ftSCCTR-l3:NS=flSCCSEi J: IFNT O0THENT 
R=NT:SE=N£:GOTO130 

X7B PRIMT«lS."e-p-S;B:pRJNTnS.CHPl[18J; : 
PRINT#S.CHR4Cn;:REd FORANDRE LINKER 
180 PRINT*lS.-U7-S;B;TR;£E:R£n SKKIU TRi=i 
CKVSECTOR TIL DISKETTES 
190 CLOSES 
200 CLOSEiS 



100 TR=19:£E=1 
110 0PEN15.8.1S 
190 OPENS. 8. 5. "n 

130 PRINT*1S.-U1 5; 0;TR;SE; PRIN7TR.SE: RE 
11 LES INN FBRSTE TRACK/SECTOR 
140 GET us . TR* : IFTR1= ' "7HENTR4 =CHR4CB J: RE 
11 MENT NESTE TRACK 

150 GEToS .fie*: IFSE4="*'THENSEt = CHRlCfil:RE 
PI MENT NESTE SECTOR 

160 NT =flSC£TRt ): NS=/l£CCS£i ): ]FN0TCNT = 1S^ 
NDNS=1 JTHENTR=NT:££=NS:Gtn013a 
170 PRINTbIS. 0-P""5:0:PRI^Ti«5.CKRtCB J;:p 
RINTpS.CHRit25S);:R£pi fCRflNDRE LINKER 
180 PR1NT«1S."U2 S;e;TR;S£:REJ1 SJCRIU TRF» 
CK/SECTOR TIL DISKETTEN 
130 CLOSES 
200 CLOSE IS 



INPUT /OUTPUT - RMI.OIR 



r 



180 028: 1 = 0: J =0 

110 FORK=0TO1S: READS: I fB=- 1 THENGDSUB1 38 : 
END 

320 POKF.At] .0:I=2fl: J =J tB: NEXT: GOSU01 30 ; 
GOTO 110 

130 REflOflS: lF^tS OJTHENPRINT "FEIL I OATflS 
ETNING : •'PEeKC63 JtP£EKC6<» )»256: £1^0 
1<*0 J-0:f?ETUr?H 

1S8 0ATf32.?P.3.32.lB1.3.36.l69,S5,l33, I 
.36.163-.Sq .133.1 . 1158 

3 60 DPTP36 . 169. 1 . 1 62 .8 , I 60 ,0 ,32 , J 86.255 , 
163.1.162.186.160.3. 17 SB 



170 DflTP32.183.2SS. 1 63 .0 . 1 62 .0 . 1 60 . 1 60 .7 

6.213, 255 . 32 . 72 . 3 . 1 63 , 1 3*17 

1 80 OflTfll 3 . 32 .21 B .7 55 . 1 62 . B . 1 60 . t 60 . 1 3*1 . 

251 .132. 2S2. 160.1 .177.251 . 23SB 

130 OATP210. 57. 200. 177. 251 .170. 708. 177. 2 

51.72,32.67.3.101.32.705. 2238 

2B0 DATA 1 83 . 37 . ?2 .3 . 1 63 . 32 . 32 . 21 8 ,255 , 1 6 

B. 1.177. 251 .218.7.32. 1865 

710 DPTA21B.7SS.200.76.1S1 .3,200.157.71, 
1B1 .753 .133.251 . 1 6S .2S2 . 1 OS . 7523 
220 OATP0 .133 ,252, 163. 13, 32, 210, 255 .76.1 
70. 3. 7*1.67.3. 36.-1 . 1115 



cor am COMMODORE 64 r ii et 

SLAGSKIB 



med 



FORMEL 64 

Features- 
^32KBvre ROM 
'16xHURTIGEREfioppv 

'indbvgget CENTRONICS 

INTERFACE 

70 NYE KOMMANDOER 

TagerlNGEN PL ADS I 

HUKOMMEL SEN 
Mngen LODNIIMGER 
'Med ON/OFF funktion 

kun 750,- 

Fa naermere opiysmnger hos- 

IP-DATA 

Stenbjergparken 3.A 
6100 SonderOorg 
04-42 05 60 



FUTURE LINE 




PILESENTERER! 

ARABISK TEKST M C8M 64/SX 64/128 
Arabisk tekstbehandling; 

" ^^STAFt 1(885! SkiBrm ° 9 Pfl Pnn ' er lMPS 801 ' Se,kosha G^OO 

- Ca ' zSSteksi manfl0 ' e * oe,,nQ;i muiigheder 
• Sammenfletning af flare tekstcr. 

- Diskkotnmandoer 

- Dansk. Engelsk & Pakistansk inslruktion medfokjcf 

Disk med TURBOLADEfl. Pris kr. 598,- 
OATEX MOUSE HI CBM 64/SX 64/128 

Grafiktegneprogram med musslyring i stil mod MMAC DRAW itl MACIONTOCH 



- Har ICON'S & "PULL DOWN" menuer 

- Dump tegnlnger/layouts p£ EPSON kompatibel & CBM printer 
h af mus. Band og Disk, samt engelsk manual P 



BestS 



rurpyufSfic! ? uXer T 2 : S3 ,fif med ' n3r d " investor er I 

UAIEX MOUS E, er ud over det sa^dvanilge Del kan nemtig all". 

PRIS Kr. 1.395.- 

TREBES TEKST V 2 O (it CBM 64/SX 64/ 1 28 

SK n Sl OT t 10 5 1 T de ' dansk . e lekstbehandlingsprogram: 
nyskabeile^ ^ behandler margmer, ma wges at vasie en 

i™1 2!i!3B£ i 882 aI unde,k ' 500 er dyrt for el tekstbehand- 
iinqsaystem der vd Ware mange af de mmdre avanceredo 
Sknvebehov 1 hjemmet. skolen eller hos den Idle erhvervs- 
anvenoe 

COMpuler " all sker hudtgt pa skaarrnen. Trebes formaifertr med sam- 

J^i 9S a'"* 8 " 06 ^edVgenngsfaclileler. som fuldt ud er pa 
nejoe med. hvad der sas 1 slorre aystemer Del er muliqi al 
fa udskrevet I&kslen pa flere lyper pnnlofe. oa informali- 
onsvmduet gar manualen overt lodig efler kort lids fortob" 

Disk med TURBOLADEft. PftlS Kr. 498,- 
Band med TURBOLADER. PRIS Kr- 448,- 

5SffiS2?^fit v « udfores Netvajrtcsysterr. til CBM 64/SX $4/128 under 
udviklmg. Ogsfl software t il AMSTAD haves, ring for Info. 

FUTUREline, Tjaarebyvej 9, 3400 Hillered 
Tlf. 02- 11 04 2H 
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BEGYNDERSIDEn 



af Steen Schmeltzer 



Forst ma det vsere pa sin ptads, 
at onske Gleedelig for-jul. Lad nu 
vaere med bare at spise alle 
Juledagene. Brug noget af tiden 1 
setskab med din computer, men 
lyt til en erfaren mand; glem nu 
Ikke din famllle!! 



Hvis du endnu ikke har lavet din on- 
skeseddel til juien, sfculle du tage og 
onske dig en god bog om din com- 
puter. Ikke et spil; men en bog! Jeg 
vil anbefale 

Basic med Commodore 64 
af Erwin Neutzsky-Wulff 
Borgens Forlag 

Resume 

Sidste gang kiggede vi lidt pa kom- 
mandoerne TAB og SPC. Jeg pro- 
vede at anskueliggore. at del er 
mere praktisk at anvende TAB i ste- 
det for SPC. Nu vil jeg vise dig, at 
det ogsa er nemmere og mere 
pladsbesparende at bruge TAB. 
fremfor CURSOR-tegnene. Kig 
forst pa dette lille programeksem- 
pel: 



Her er CURSOR-kontroltegnene 
brugt til at bestemme, hvor pa 
skasrmen teksten skal sta. Dette 
programeksempel fylder 539 bytes 
i computeren. Det naaste eksempel 
er nsesten magen til det forste; men 
nu er der brugt TAB til at bestemme 
placeringen med. Dette eksempel 
fylder 498 bytes. Som du ser, er 
TAB ogsa besparende rent plads- 
maessigt. 

Det sidste eksempel er brugt i 
det demonstrationsprogram, Load 
programmet eller indtast det for du 
gar videre. REM seetningerne beho- 
ver du ikke indtaste, de er kun med 
for forklaringens skyld. 

GET 

GET bruges til at indhente oplysnin- 
ger fra tastaturet med. Med GET 
kan der kun indhentes et tegn af 
gangen. Cursoren vil ikke komme til 
syne, og der skal ikke tastes < re- 
turn > efterderertastetettegn.Se 
programeksemplet, linjerne 34-46. 
Samtidig med at GET bruges, defi- 
neres ogsa variablen A. bvor input- 
tet anbringes. Man kan derefter te- 




ste pa A indtil man far et input, man 
vil bruge til noget. 

VARIABLER 

Hvad er variabler? Prov at forestille 
dig en stor reol der er opdelt i en 



S = STIL IN00YGGET U 



10 REH xxxx*xxxxxxxxxx»xx*xxxxxxxxxxxx 

12 Ren * * 

11 REn x flENUl X 
16 REH x x 
18 REn »xx?>x*x*xxxxx*xxx*xx>xxxxxxxxx 
20 : 

22 PFIMT'tCLRJ"; 
2-1 PRINT"C2CN3E5CH] 

R" 

26 PRINT"C1CN3(5CH) 
ELSE" 

2S PRINT "C 1CN3 C 5CH3 

R" 

30 PRINT"C1CN3C5CH3 ft = flfSLUT PROGRflfl" 
32 PRINT"tGCN3C5CH3 C REU] INDTflSTC OFF 3 CR 
EUJ0NSKEOEC Off] [ REO ]0OGSTPU[ Off] C HOfl3 " 

31 GET fli 

36 3F fti. = "£■ THEN "18 
30 ]f At = ■•p - THEM 56 

13 IF s "T" THEN 116 

12 IF flt = "ft" THEN 222 
11 REH 

16 GOTO 31 



10 REH xxxxx».xxxxxx?xxxx>xxxxxx>xx%*x% 
12 REH > * 

11 REn x HENU2 x 
16 REH x x 
lfl RET 1 >xxxxxxxxxx>x»*>xxxxy*xxxxxx>x* 
20 : 

22 PRINT "t CLR3 " ; 
2-1 PR3NTTfl0C12S3" 



1 . ST3L INDSYGGET UR" 



F = 



T = 



PRBU TIOSfORSINK 
TEST RF UflRIf»0LE 



26 PRINTTfl0C165J" 2. PRBU TlOSf ORS]NXEL£ 

E" 



28 PRIN77ABtl6Sr 
30 PRINTTfieci65i" 



3. TEST flf UflRIflBLER" 
1. flfSLUT PROGRAM" 



32 PRINTTflBC2J3Sy EREVOINDTASTt OFF) CREU 
3 BNSKEDEC OFf 3 C RE<J 3TfLC Of f K HOH3 " 
31 GET ft 

1 THEN 18 

2 THEN 36 

3 THEN I 16 
1 THEN 222 



36 IF ft 
36 IF ft 

10 IF ft 
12 If ft 

11 REn 

16 If ft 



<1 OR ft>3 THEN 31 
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masse sma rum. der er ingenting i 
rummene, og der star heller ikke 
nogen varebetegnelse under nogen 
af rummene. De flesle af disse 
tomme rum star til din disposition, 
I hvert af rummene kan du ptacere 
enten en vasrdi eller en tekststreng. 
Samtidig med at du placere »va- 
ren«, vil der ogsa" blive skrevet vare- 
betegneise pa rummet. Men pas pa, 
rummet er ikke sa stort, sa hvis du 
kommer til at anbringe noget i et 
rum der er optaget. vil den nye vare 
skubbe den gamle ud, medmindre 
du pa forhand har bestemt. at de 
skal "bo- sammen. 

Der er 3 slags variables 

TEKST-variabler 

DEClMALTALS-variab ler 

HELTALS-vari abler 




64'eren er i stand til, at kende 
variabelnavne pa op til 2 bogstaver 
+ eventuelt kendingsbogstav. 
Kendingsbogstavet lor tekstvariab- 
ler er et S, for heltalsvariabler et %, 
mens decimalvariabler intet ken- 
dingsbogstav har. 
Eksempel: 



A = 523 

A% = 379.33 

A$ = "COMMODORE 64" 



Hvis du er inde i demoprogram- 
met nu, kan du prove at afslutte pro- 
grammet. indtaste ovenstaende 
nojagtigt som det star og afslutte 
river linje med < return > . Du har nu 
tildelt 3 variabler tre forskellige vasr- 
dier. Du kan prove, om det virker 
ved at taste folgende: 



PRINT A < return > 
PRINT A% < return > 
PRINT AS < return > 



Nu skulle du fa udprlntet de 3 
vcerdier, du tidligere har indtastet. 

Variabelnavne kan altsa vsere op 
til 2 tegn. Det forste tegn skal vaare 
et bogstav, det andet tegn kan en- 
ten vasre et bogstav eller et tal. 
Imidlertid ma et variabelnavn ikke 
passe sammen med et Basic-nogle- 
ord. F.eks. duer variabelnavnet RU 
ikke, da det passer sammen med 



RUN. Se i svrigt side 126-127 i den 
danske brugervejledning. hvor der 
star samtlige Basic-nogleord, du 
skal passe pa. 

Variabelnavnet kan godt vaare pa 
mere end 2 bogstaver. men compu- 
teren regner kun med de to forste 
tegn. Navnet BANANER vil compu- 
teren kende som BA, og derfor kan 
du ikke have et andet navn som 
f.eks. BALANCE i samme program, 
da det ogsa starter med BA - men 
eilers er der frit slag. 

Du undrede dig maske over, at 
A$ indeholdt bade bogstaver og tal, 
nar vi kaldte den en tekstvariabel. 
Det lyder nu ogsa lidt underligt; 
men som du ser er tekststrengen 
omsluttet af gaseojne, og her gael- 
der de samme regler for, hvad der 
ma sta i en variabels tekststreng. 
som hvad der ellers ma sta i en al- 
mandelig tekststreng. Der ma sta alt 
muligt. 

Nar du skriver RUN og starter et 
program, vil computeren foretage 
en hurtig gennemgang af samtlige 
rum i reolen og gore dem rene. 
Samtlige variabler bliver tomt eller 
sat til vssrdien 0. Du kan ikke tildele 
variabler vaerdier nogle og sa starte 
programmet for at bruge disse vser- 
dier. De findes nemlig ikke mere. 
Hvis du endelig er interesseret i det, 
kan du starte programmet med en 
GOTO kommando. Denne sletter 
ikke variablerne. 

Du kan lave en GOTO til hvilken 
som heist linje i dit program, dog 
ikke til en subrutine. Her moder pro- 
grammet en RETURN, og da det 
ikke forst har modt en GOSUB, vil 
den stakkels maskine ikke vide, 
hvad den sa skal gore. Derfor stop- 
per den, og udskriver en fejlmelding 
pa skaermen. 

Det normale vil vaere at GOTO 
forste linjenummer i programmet. 
med mindre du i de forste par linjer 
define rer nogle variabler. Compute- 
ren tommer ikke variablerne, nar 
programmet stoppes. Derfor er det 



muligt at udprinte vasrdien af de 
brugte variabler efter programafvik- 
lingen. Dette er isser nyttigt, hvis der 
er en fejl i programme!. Du har sa 
mulighed for at leese vaerdien af en 
hvilken som heist variabel ved hjaslp 
af PRINT. 

FOR TO NEXT-lokker 

Dette sast kommandoer kan nasr- 
mest sammenlignes med en taaller. 
Man tildeler en variabel en vaerdi, og 
kan sa ia?gge til eller traskke fra 
denne vasrdi, indtil betingelserne er 
opfyldt. 



10 FOR X = 1 TO 1000 : NEXT X 



Dette er en typisk FOR TO NEXT 
lokke. Det er en tidsforsinkelse og 
virker saledes: 

X tildeles vaerdien 1, og hver 
gang computeren moder komrnan- 
doen NEXT X, siger den X=X + 1, 
og det bliver den ved med, indtil 
X=1000. FOR TO NEXT behover 
ikke at sta pa samme linje. Hvis du 
ikke allerede har gemt demo-pro- 
grammet pa enten band eller di- 
skette, skal du gore det nu. Nar det 
er overstaet, taster du NEW. Indtast 
nu dette: 




10 FOR X=1 TO 20 
20 PRINT X 
30 NEXT X 



Tast RUN. Der skulle nu sta 20 
linjer pa skaermen med vaerdien af 
X. og med mindre computeren er i 
stykker, skulle det vaere tallene fra 
1 til 20. For lige at genopfriske no- 
get vi tidligere har vaeret igennem: 
Prov at saette et komma efter X i 
linje 20. Tast RUN. prov sa bagefter 
at udskifte kommaet med et setni- 
kolon. 

Computeren kan ogsa taalle bag- 
laans. Prov at aendre linje 10 i eks- 
emplet til: 



10 FOR X = 20 TO 1 STEP 



-1 



Tast RUN. Resultatet skulle 
gerne vasre det samme som sidste 
gang, bortset fra, at computeren 

fortsaattes side 60 ► 
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Interruptstyring er en at de virke- 
tig staerke rnuligheder, man far med 
i kobet, nar man programmerer i 
maskinkode. 

Ved at gore brug af interruptet far 
vi nemlig mulighed for at kore to 
eller flare programmer samtidig • 
dvs. en form for multitasking. 

Interruptet udfores ca. 60 gange 
i sekundet - og I ige s3 mange gange 
det forekommer, kan vi checke, om 
en bestemt ting sker, eller vi kan 
flylte sprites rundt pa skaermen, el- 
ler hvad vi nu matte onske. Kun ian- 
tasien ssetter graensen. Hvad der er 
nok sa vassentligt er ( at de rutiner, 
vores maskinkode udforer. Ikke be- 
hover at have indflydelse pi vores 
hovedprogram, hvis vi onsker det. 

I det her viste eksempel korer din 
Extramon som ssedvanligt, men 
samtidig sorger den lille maskinko- 
derutine for at udskrive opkoder 
m.v. pa skaermen, hvis en af funkti- 
onstasterne trykkes ned. Hvis ingen 
af F-tasterne er trykket ned. sendes 
interruptet retur for at udfore de ru- 



tiner. der er dets egentltge opgave 
i computeren. 

Programmet er placeret fra 
SCCOO til SCD1C, og kornmer sale- 
des ikke til at ligge i vejen for evt 
andre maskinkoderutiner. med min- 
dre disse er over 3Kbytes, og det 
ligger nok ud over, hvad de fleste 
giver sig i kast med. 

Det forste vi ma gore for at fa 
interruptet til at interessere sig for 
vores program, er at taende den 
vektor, der viser, hvor interruptet 
skal starte. Men inden vi gor det, ma 
vi stoppe interruptet. Det gores 
med opkoden SEI. 

Den del af programmet, der skal 
udfore arbejdet, starter SCCOD, og 
det er den denne adresse, vi vil have 
interruptet til at starte pa.. Hvad der 
ligger forud. er kun de indledende 
ovelser, og de skal kun udfores en 
gang. 

Forst Isegger vi den mindst bety^ 
dende byte (LSB) i akkumulatoren. 
i dette tilfselde SOD. Denne vaardi 
lagrer vi i vektorens LSB, $0314. 



Derefter Isegger vi den mest bety- 
dende byte (MSB) - SCC i akkumu- 
latoren, og lagrer denne vaerdi i vek- 
torens MSB. Nu peger vektoren pa 
den adresse vi onsker, og vi saetter 
interruptet i kraft igen med opkoden 
CLI. Vektoren peger nu pa SCCOD. 
og vi gar tilbage til Extramon med 
BRK. Hvis vores hovedprogram var 
et basic-program ville vi retumere 
med RTS. 

Vi er nu naet frem til $CC0D, hvor 
det egentlige program starter. Det 
forste vi nu skal gore er, at finde ud 
af, om en af funktionstasterne er 
trykket ned. Vi laagger $03 i akku- 
mulatoren og sammenligner med 
indholdet i adresse SC5 (197). Ind- 
holdet i denne adresse skifter alt 
efter hvilken tast, der er trykket ned, 
og S03 svarer til F7. Hvis de to tal 
svarer til hinanden, springer pro- 
gramme! frem til den del, der tager 
sig af udskriften pa skaermen. 

Hvis indholdet i akkumulatoren 
og $C5 ikke svarer til hinanden. gar 
programmet videre og leegger veer- 



STA 
LDA 

*$ 
$ 



CMP 
BEQ 
BNE 
INX 



ccoo 


SEI 




CC01 


LDA 


*$0D 


CC03 


STA 


$0314 


CC06 


LDA 


•SCC 


CC08 


STA 


$0315 


CCOB 


CLI 




ccoc 


BRK 




CCOD 


LDA 


*$03 


CCOF 


CMP 


$C5 


ecu 


BEQ 


SCC28 


CC13 


LDA 


-$06 


CC15 


CMP 


$C5 


CC17 


BEQ 


$CC2B 


CC19 


LDA 


*$05 
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dien for den naaste F-tast i akkumu- 
latoren. sammenligner med $C5 
osv. 

Princippet er fuldstsendig del 
samme som i folgende basic-linje: 

A = 3:IFA = PEEK(197)THEN 
adresse 

Hvis ingen af F-tasterne er tryk- 
ket ned. sendes interrupts retur til 
dets normale arbejds med -JMP 
SEA31 (59953, KERNAL ROM). 

Nu skrev jeg for, at hvis vserdien 
i akkumulatoren svarede lil indhol- 
det i $C5 t sa hopper programmel 
frem til det afsnit, hvorden onskede 



rutine findes. Det var en sandhed 
med modifikationer. BEQ, BNE og 
de andre opkoder, vi anvender til 
forgreninger. hvis givne betingelser 
er opfyldt, kan kun klare et hop pa 
127 adresser frem eller tilbage. Det 
betyder. at vi ikke kan springe langt 
nok ved hjselp af disse opkoder i 
programmer Derfor har det vasret 
nodvendigt at lave et sakaldt JUMP 
TABLE i programmed hvor det en- 
delige hop til den onskede adresse 
sker med JMP. Med denne konv 
mando kan vi springe sa langt, vi 
onsker. 

Hvis f.eks. F5 er trykket ned 



af Jens Jorgen Krag Hansen 



(adresse $C5 har vaardien 6), sprin- 
ger programme! forst frem til 
SCC2B; her far maskinen at vide, al 
den skal kore videre til SCCA4 

Den rutine, vl nar frem til pa 
denne adresse, er igen delt i to. En 
der laver en udskrift pa sksermen, 
hvis F5 er trykket ned, og en der 
laver en anden udskrift, hvis bade 
F5 og SHIFT er trykket ned. 

Hvilken del af programmed der 
skal udfores, afhsenger af indholdet 
I adresse $0280, der er et sakaldt 
(tag for SHIFT-. Commodore- og 
CTRL-tasten. Afhaengigt af hvilken 
af de Ire taster, der er trykket ned, 
fremkommer vserdierne 1 , 2 eller 4. 

Vi er interesserede i. om SHIFT er 
trykket ned. Vi laegger derfor $01 i 
akkumulatoren og sammenligner 
med S028D. Hvis SHIFT er trykket 
ned, hopper programmet videre til 
anden del af den rutine , der er knyt- 
tet lil F5. 

Vi prover n\i at se, hvad der sker, 
nar SHIFT ikke er trykket ned. Vi 
skal have skrevet * S pa sksermen. 



CC1B 


CMP SC5 


CC3C 


BNE 


$CC25 


CC5D 


JSR 


$FFD2 


CC7F 


LDA 


#$24- 


CC1D 


BEQ $CC2E 


CC3E 


LDA 


*$53 


CC60 


LDA 


*$4D 


CC81 


JSR 


$FFD2 


CC1F 


LDA-+$Q4 


CC40 


JSR 


$FFD2 


CC62 


JSR 


$FFD2 


CC84 


JMP 


SEA31 


CC21 


CMP $C5 


CC43 


LDA 


*$54 


CC65 


LDA 


•$50 


CC87 


LDA 


*$oa 


CC23 


BEQ $CC31 


CC45 


JSR 


SFFD2 


CC67 


JSR 


$FFD2 


CC89 


CMP 


$D3 


CC25 


JMP $EA31 


CC48 


LDA 


*S41 


CC6A 


LDA 


♦$20 


CC8B 


BNE 


$CC84 


CC28 


JMP SCC72 


CC4A 


JSR 


$FFD2 


CC6C 


JSR 


SFFD2 


CC8D 


LDA 


*$49 


CC2B 


JMP $CCA4 


CC4D 


LDA 


*$20 


CC6F 


JMP 


$EA31 


CC8F 


JSR 


$FFD2 


CC2E 


JMP SCCDB 


CC4F 


JSR 


$FFD2 


CC72 


LDA 


*$01 


CC92 


LDA #$4E 


CC31 


LDA *$01 


CC52 


JMP 


SCC79 


CC74 


CMP 


$028D 


CC94 


JSR $FFD2 


CC33 $ 028D 


CC55 


LDA 


*S08 


CC77 


BEQ 


$CC87 


CC97 


LDA'*$58 


CC36 


BEQ $CC55 


CC57 


CMP 


$D3 


CC79 


LDA 


*$OC 


CC99 


JSR 


$FFD2 


CC38 


LDA *$08 


CC59 


BNE 


SCC52* 


CC7B 


CMP 


$D3 


CC9C 


LDA 


*$20 


CC3A 


CMP $D3 


CC5B 


LDA 


*$43 


CC7D 


BNE 


SCC6F 


CC9E 


JSR 


$FFD2 
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MASKINKODE 




fortsat 

men det er jo ikke ligemeget, hvor 
det komrner til at sta. Derfor starter 
vi med at kontrollere, om cursor 
star i den kolonne, hvor vi vil have 
udskriften. Cursorercs position (0- 
39) finder vi i SD3. Vi laegger SOC i 
akkumulatoren og sammenligner 
med SD3. Hvis cursor ikke star pa 
den rigtige plads, skal vi ikke have 
skrevet noget ud pa skeermen, og vi 
komrner ud af programmet med 
BNE, der henviser til den adresse, 
der returnerer irtterruptet. 

Hvis cursor star pa den rigtige 
plads, gar programmet videre og 
laegger ASCII-koden for det on- 
skede tegn i akkumulatoren, og 
hopper derefter til en udskrift-rutine 
med JSR SFFD2. 

I $FFD2ligger en af 64'erensind- 
byggede rutiner kaldet CHROUT. 
Den udskriver akkumulatorens ind- 
hold pa cursors plads og rykker 
cursor en plads frem. CHROUT er 
kun en af en raskke nyttige rutiner 



i KERNAL, som kan spare en for en 
masse arbejde, nar man arbejder i 
maskinkode. En samEet liste over 
diss KERNAL-rutiner og deres virk- 
ning flndes i Programmers refe- 
rence Guide. 

Nar det onskede tegn er udskre- 
vet, gar programmet videre til naa- 
ste adresse, hvor vi laegger ASCII- 
koden for det nasste tegn ind osv. 

Na det sidste tegn er udskrevet, 
hopper vi igen ud af vores program 
ved at sende interruptet til SEA31. 
Det gaelder dog ikke for de dele af 
programmet, der udskriver STA, 
BEQ og BNE. I disse tre tilfaalde 
springer vi til den del af program- 
met, der udskriver et dollartegn pa 
skasrmen. Pa denne made slipper vi 
for at udsknve den samme rutine 
flare gange! 

Nar hele programmet er indta- 
stet, startes det med .G CCOO, sa 
kores den lille rutine. der asndrer 
vektoren for interruptet - og pro- 
grammet korer. Hvis man onsker at 
gemme programmet, er det lettest 



at gemme det umiddelbart efter Ex- 
tramon med folgende kommando; 

.S'TUNKTIONS- 
TAST".01.CC00,CD1C 

Programmet kan sa hentes igen 
med 

.L"FUNKTIONSTAST",01 

Hvis man anvender diskette, skal 
01 i begge tilfaelde udskiftes med 
08. 

Endelig skal jeg da lige naevne. at 
programmet meget let kan udvides 
til at udskrive otte opkoder mere. 
Det krasver blot, at man laver endnu 
to udskilninger pi samme ma.de, 
som da vi undersogte. om SHIF var 
trykket ned. Her bruges blot 2 og 4 
i sammenligningen med S028D for 
at checke om henholdsvis Commo- 
dore- eller CTRL-tasten er trykket 
ned, Hvis man onsker det, kan man 
ogsa asndre udskriften for den en- 
kelte tast blot ved at laagge ASCII- 
vasrdieme for de onskede tegn ind 
I stedet for dem, programmet er ud- 
styret med. ■ 



CCA1 


JMP 


$EA31 


CCC2 


BNE 


$CCBB 


CCE4 


CMP 


$D3 


CD05 


LDA 


*$42 


CCA4 


LDA 


-$01 


CCC4 


LDA 


♦$42 


CCE6 


BNE 


$CCD8 


CD07 


JSF 


$FFD2 


CCA6 


CMP 


$028D 


CCC& 


JSR 


$FFD2 


CCE8 


LDA 


*$4C 


CDCA 


LDA 


.$45 


CCA9 


BEQ 


$CCBE 


CCC9 


LDA 


*$4E 


CCEA 


JSR 


$FFD2 


CD0O 


JSR 


SFFD2 


CCAB 


LDA 


*$0C 


CCCB 


JSR 


$FFD2 


* CCED 


LDA 


*$44 


CDOF 


LDA 




CCAD 


CMP 


$D3 . 


CCCE 


LDA 


*$45 


CCEF 


JSR 


$FFD2 


CD11 


JSR 


$FFD2 


CCAF 


BNE 


SCCAl 


CCDO 


JSR 


$FFD2 


CCF2 


LDA 


♦$41 


CD14 


LDA 


*$20 


CCB1 


LDA 


•$23 


CCD3 


LDA 


*$20 


CCF4 


JSR 


$FFD2 


CD16 


JSR 


$FFD2 


CCB3 


JSR 


$FFP2 


CCDS 


JSR 


SFFD2 


CCF7 


LDA 


*$20 


CD19 


JMP 


$EA31 


CCB6 


LDA 


*$24 


CCDS 


JMP 


$CC79 


CCF9 


JSR 


$FFD2 


CD1C 


BRK 




CCB8 


JSR 


$FFD2 


CCDB 


LDA 


*$01 


CCFC 


JMP 


SEA31 








CCBB 


JMP 


SEA31 


CCDD 


CMP 


$028D 


CCFF 


LDA 


•$08 








CCBE 


LDA 


*$08 


CCEO 


BEQ 


SCCFF 


CDOl 


CMP 


$D3 








ccco 


CMP 


SD3 


CCE2 


LDA 


♦$08 


CD03 


BNE 


$CCFC 
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BORSSPIL 

John Bach Thygesen har sendt 
dette borsspil, hvor op til 3 spillere 
kan kobe og saalge efter gaeldende 
kurser. Er man ved at ga fallit, kan 
man lane op til kr. 10.000.00 at Com- 
puterbanken. Lanet skal lilbagebe- 
tales med 10% hver 3. spillerunde 
og den. der forsl har mere end 
50.000 kroner, har vundei 



EVENTYRSPIL 

Steffen Brauner kalder lidt beske- 
dent sit spil for et »simpelt» eventyr- 
spiL Prov om du kan lose det. Grun- 
dig inst ruktion i starten. 



SUPER SPRITE 

Man starter med at tegne sin sprite 
pa skasrmen med »2« eller «3», 
som angiver farve 1 . 2 og 3. De pa- 
gasldende tal skal benyttes sammen 
med CTRL-tasten. Trykker du »4«, 
sletter du et punkt. 

CTRL-4 udvider spritefigurens x- 
akse ( mens CTRL-5 udvider y-ak- 
sen. 



I.H.Datatilbyder 

1541 diskettestation 

kr 2895,00 

Joystick 

(lil Commodore. Amstrad og Alan) 

BAT HANDLE kr. 385,00 

RED BALL™ kr. 385,00 

3 WAY deluxe kr. 435,00 

THE BOSS kr. 260,00 

Competition PRO™ 
5000 kr. 260,00 

Stort udvalg i printere, disketter og 
andet tilbeher. 

★ AMSTRAD- ATARI 
- det er ogsa os ★ 

LH-DataoenterApS 
Pakhustorvet 4 
6000 Holding 

tlf . 05-53 33 99 

Alle pnser ef mcl. moms og porto. spar etler- 
kravsgebyrot ved forudbetallng. 



section 



Nar spritebilledet er faerdigl. tryk- 
kes CTRL-6, hvorefter der sporges 
om startlinjenummeret. Nar man har 
sKrevet det, vil programme! udskive 
datalinjer. 

Indsendt af Anders Buch. 



FRYS LINJER 

Jeppe Bundsgard har indsendt 
dette program, der opbygget over 
»frys den overste linje« fra RUN nr. 
4 1985. 

Programme! gor det mulig at asn- 
dre pa pfacering, Isengde og farve 

Programme! er bygget op over 
en menu. Til punkt 1 i menuen skal 
naavnes. at RETURN stopper og 
putter linjer i memory, F1 springer 
tilbage til menu, og F3 flytter tek- 
sten. 



Punkterne 2-6 er selvforklarende 
mens punkt 7 laver variablerne om 
til ■•rigtige- linjer og putter dem i 
hukornmelsen tra 38000 og fremad. 
Derefter bliver de savet. Nar man 
senere loader datalinjer skal man, 
for at fa programmer til at virke 
skrive: 

10 F0RA = 49152 TO 49152 + 35 + 
antal tegn READ B : POKE A.B 
NEXT SYS 49152 



MEMORY KOPIERING 

Dette program, som vi har modta- 
get fra Henrik Meyer, kopierer et 
areal af hukornmelsen til enten band 
eller diskette. Det eneste, der er 
nodvendigt at vide, er start- og slu- 
tadresse pa det. der skal kopieres 



PROFESSIONEL TEKSTBEHANDLING 



CBM 64 WRITER PROFESSIONAL 
version 4.0 
af AXEL BANG 

TIL COMMODOR E 64, SX 64 og C 128 

Programme! indeholder im .« 

- 28.500 legn 

- Daiuk karakt-cryei 

- Linteoritnterci 

- Automaliik linicskift 

- Avnnccrci rcdigcring 

- Fuld labulaior 

- AJfuoncrmg 

- Fot-Zbaglayii. scroll 

- Amomaiisk segVerstat ord 

- Kalkulaior 

- Format juttering 

- SammcnkoWlng af fine dofcumcntcr 

- Fuld fikkrrhed mod tab af ickn 

- Foibcrcdi ill fotosais 

- ITdskrivning p* lypchjulsskriver 

- Og mcget mere .... 

Med programme! felgcr en udforlig let ror&tactig dan.sk brugervcjledmng. 
Programme! er udviklct af journalist Axel Bang. 
Damk brugerservic* (hocline). 

Pris, EPROM version kr. 675,00 inch moms 

Pris, DISKETTE version kr. 575,00 incl. moms 

Forsendelsesornkostninger kr. 20.00. 

ENEFOR HAND LING 
Danmark, Sverige, Norge og Finland 

software ^ DANSK DATA SERVICE ApS 



Fasanvsengei 307 

Postboks 29 DK-2980 Kokkedal Telefon +45 2 24 32 98 
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HEP10RV KOPIERING 



INOSENDT AF 
HENRIK MEYER 
RUNODELEN 1 
6040 EGTUED 



TIL COMMODORE 64: 

0 POKE788.52:POKE53280.l:POKE53281 .I:PRI 
NT rCLR3C2CN3[BLU][REUr TflBClZr nEHORY K 
OPIERING " 

1 INPUrT3CN 3 TCH 3 PROGRAPtNAUN "ifi 

2 IFLENCF* 3H6THENPRINTT CH3C REU3PROGRAtt 
NAUN FOR LflNGTT5C0r :GOT01 

3 IFl_ENlF*3^0THENPRINrTCHJtREU3SKRIU PR 
OGRftHNflUNK 5CD]": GOTO I 

4 F*=LEFTiCF*. 163 

•5 FORNMTOLENCFi 3: P0KE819+N .ASCCIIIDUFi . 
N.l 3 3: NEXT 

G INPUftCHlSTflRT ADRESSE [ DECIMAL 

7 IFSA>65536THENPRINT T CH3C REU3START ADR 
ESSE FOR ST0RK2C0]" :G0T06 

8 IFSA=0THCNPRlNTTCH3rREU3SKRIU START A 
ORESSEIC 2CO]"' GOT06 

9 INPUTT CH3SLUTC 2SPC3ADRESSE I DECiriAL 
!Efl 

10 IFEA=0THENPRIN T T CH3T REU3SKRIU SLUT 
DRESSCir2COT':G0rO9 

11 IFFA<=SATHENPRINT"CCH3tREU3SLUT ADRES 
SF F0RKeRTK2C0]-':GDT08 

12 IFEn>65536THENPRINr-r CH3 C REV3SLUT APR 
ESSE FOR STORK 2C03": G0T08 

13 INPUT rCHlTAPE/OISKC2SPC3Cl/8 3C8SPCJ- 
:ON 

14 IFDNOlrtNDDNOerHENPRINr rCH3CREU3FEJ 
Ll TRYK 1 ELLFR 8 It 2C01" : GOT013 

15 POKE56334.PEEKC56334 3AND254 

16 PRINT T 22SPC] " 



17 1^43152; 1 1 =431 52; ES=L 

19 READ At 

20 IFAt = - "THFN208 

30 ALt=LEFT*CA*.l 3: AR«=RIGMTiCfl* , 1 3 

40 IFA5CfAL$3<65THFND=URLCALi)xl6:GOTO60 

50 D=CASCCflLi ] -55 3x16 

60 IFASCCARi 3<65THEND~D+UAL(ARi ): GOTOB0 

20 D=D+ASC( ARi 3-55 

8B POKE! .D-" 1=1+1: G0TO19 

100 DATf=in9 .08 ,rt2 ,08 . A0 . FF .20 .Bft .FF .A3 .01 

.F12,34.fl0.03.20.BO.FF,A9,FF .85. FB 

1 10 DATAA3.FF.85.FC.F»2.00.A0.FF.AS,FB,20 

.D8.FF.60,- 

208 POKEII+3,DN:POKEII+S,ES 
210 POKEII+10.LENCF*3 

220 A=INTCSA/256 3:P0KEII+19,SA-Ax256:P0K 
EII+23.A 

230 R = INTCEA/2S6 3: POKEII +27 .EA-Ax256: POK 
EII+29.A 

235 PRINTTCN3CCH3PROGRfllWET FYLDERt 8SPC 
r:FH-SfV' BYTES" 

240 PRINT T 2CN3T CH1SAUER £ REU ] Fi' T OFF 3 . 

TRYK f, REU] RETURNC OFF3 " 
245 P0KE56334.PEEKC56334 30R1 
250 GETfli: I FAi <>CHR*C 13 3THEN250 
260 PRINT: SYS43152 
270 END 

KONTROLSUfl FOR HEflORY KOPI . 



0 


67 


1 


41 


2 


133 


3 


130 


4 


50 


5 


154 


G 


2 


7 


236 


S 


34 


9 


206 


10 


3 


11 


167 


12 


154 


13 


96 


14 


149 


15 


42 


16 


157 


17 


56 


19 


236 


20 


76 


30 


189 


40 


17 


50 


55 


68 


250 


70 


199 


80 


211 


100 


66 


1 10 


182 


200 


202 


210 


222 


220 


34 


230 


1 1 


235 


186 


240 


75 


245 


193 


250 


78 


260 


1 18 


270 


128 








FRYS L1NIER 

IMDSENDT flF 
JEPPE 6UIHDSGAARD 
TRANEH0JEN 89 
5Z50 ODENSE SU 



TIL COMMODORE 64: 

180 POKE53280 . 14: P0KE53281 . 14 

1 IB PRINT f. CLR3E BLU J ~ : FORA= 1 T03; PRINT "xx 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx'' ; 

:NEXT 

120 FORft=l TQ6: PRINT "x*xxxxf 28SPC 
; :NEXT: GOTO180 

130 PR I NT "C HOm'c 4CN3C 8CH K 2C/Y 3[ S/f )E 2C/ 
Y3C S/H3C 3SPCJC S/N3C2C/Y3 t S/N3C C/Y]t S/flJ 

C S/031 30Y3f S/P3C 2C/'Y]" ! FORD = I TO 1 0: NEXT 
140 PR I NT "C C03£6CH3C4SPC3tC/N3C2C/^3C S/1H 
] tC^»3 [S/pi3tC/P3C2SPCHC/f] CC/N] [SA 

' I C/P ][ 2SPC ] [ Cyt* 3 " : FORD = 1 TO 10: NEXT 

150 PRINT S 6CH3t4SPC3CC/N]t 2SPC3CS/H3 EC 

✓T3£3SPC3t£/T13 CCyG] ICVN3 C C/P 3C 3SPC3C C 

✓N3':FORD=1TO10:NEXT 

160 PRINT " C C0 31 6CH3[ 2SPC 3 1 S/TJ3 C C/P 3 1 S/o3 
t 2C^P][S/-N3T 3SPCK2CxP3£ S/N3 t S/T13C C^F3C 
Sstil CC^K3SPC3[C/*N3':FORO = 1TO10 
170 RETURN 

180 PRINT" «xxxxC 8SPC3PRAESENTERER: I 7SPC 
ixxxxxx" ; 



130 PRlNT'xxx*.xx[ 28SPC 3 x xxxxit "'; 

200 PRINT' x 3SPC31 S/0 31 C/Y3E 17SPC3* 

xxxxx ; 

218 PRINT -x«w[9SPC3t£/03RYS L INIERt 8S 
PC]xxx*xx~: 

220 PRINT' nxxwt 28£PC3*«x*x ; 

238 PRINT'xxxxjoc 5SpC3UDflRBEJOET 1985 AF 

[5SPC]xju*x* ': 

248 PRINT "xxxxxxt 29SPC]xxxxxx" ; 

250 PRINT xx*xxx[ 2SPC][ 3C/Y 3C SyP3C 7SPC3E 

S/OJL C/Y3t S/T13 t 1 2SPC 1 xxxxxx ' ; 

260 PRINT ' x x>x**C 5SPC 31 CA*)l 7SPC3C S/L 31 C 

/P3tS/N3C12SPC3xxxxxx ; 

270 PRINT 'xxjtjtjtxC 5SPC3C C/N3 EPPE[2SPC3tC 

■/P3 CS/'H] UNDSGflflRDI 2SPC3xxxxx» ; 

2S0 PRINT' , x>xxxxC2SPC3CS/ri3(2C^P)CS/N3[7 

SPC][ S/*L3[C/P3t S/N3C L 2SPC 3 xxxxxx" : 

230 PRINT xxxxxxt 28SPC3xxxxxx" ; 

300 PRINT' xxxxxxt 28SPC 3 xxxxxx" ; 

310 F0RFU1T02: pRINT"xxxxxxxxxxxxxxxxxxxx 

xxxxxxxxxxxxxxxxxxxx" ; : NEXT 

320 pftlHJ' xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

xxxxxxxmx i :POKE2023.42: GOSUB130 

330 : 

340 P0KE55.112:P0KE56.!48:REH FLYTTER ST 
RENG-UflR I ABL E R ENE TIL 38000 OG NEDEFTER 
350 RET1 xx LftUER HASK I NKODE-PROGRAd XX 
360 FORA=4915?T0q318?:REflOB:P0KEfl .8: NEXT 
370 DATA 120. 169.13. 141 .20 . 3 . 1 63 . 1 92 . 1 4 1 . 
21 .3 .88.96. 162 .8. 189.36. 192 .41 .63 .157.0 
380 DATA4 .169. I .157.0.216.232,224 .48,288 
.238.76.19.234 
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338 REM xxxxxxxx INITIALISER xxxxxxxx 
100 DIflDLi C30B ): SC=2S5: BT =0: SU =39088 I SU C 
1 3=r£EKC15 ):SU(2 3=PEEKC 16 3 : AT = 1000 
110 F0RA^8T0251:MRt=MR*t ' :NEXT 
420 GR=19l52:POKEGRr30. 128:P0KEGRt21 ,13 
130 REM x»xx*x SKRIUER JB-LOGO xnxxxxx 
110 F0RA=GR»36T0GRtl55: READS: POKER. B: NEX 
1: A=0:B=1 

-150 PRINrCHOn3t23CN3! 27CH3TRYK EN TflST " 

^60 GETflt: P0KE616 .A: GOSUB1 30: fl=Atl : I FA = 1 
3THENA=0 

-178 IFA* = '"THEN160 

188 SYS19I52:REM STARTER M/K-PROGRAM 

490 P0KE53298.6:P0KE5328l ,6 

500 PRINT ' I CLR3I LTBLUH 6CN 3 TABC 10 Y xxxx 

*XXX**XtXXXXX**X" 

■510 PRlNTTABC 10)'"*C 18SPC3* 

520 PRlNTTABC 10 )** !UiHT3!REU31 SKRIU LIN 

IECR3COFF3ELTBLU3 X" 

530 PRlNTTABC 10 )"x( 10SPC]3t 1 

518 PRlNTTABC IB 1"* CUHT3CREU32 FARUE-SKI 

FTtOFFl!LTBLU3t1SPC3*" 

550 PR INT TAB t 18 3"*! 18SPC 3* 

560 PRlNTTABC 10 3"* LldHT]CREU)3 START-TEG 

NE OFF3C LTBLUH5SPC5* 

570 PRlNTTABC 103 '*[ 18SPC3*" 

580 PRINT T ABC 10 3 'x CUHT3CREU31 SLUT-TEGN 

C QFF3C LT8LU3I 6SPCJ* 

590 PRlNTTABC 103"*C !8SPC3»~ 

600 PRlNTTABC 10 3* C.UHT3CREU35 LAUE DATA 

LINIERi OFF3!LTBLU3* 

610 PRlNTTABC 103" *C 18SPC ]x 

620 PRlNTTABC 10 3*'* [UHTJCREU36 SE D.L. P 

AA SIP! OFF3CLTBLU3* ' 

630 PRINTTA0C 1 0 3 "*C IBSPC]*"* 

618 PRlNTTABC 10 3* t WHT3E REU37 SPUE DATA 

LINIERL OFP3CLT0LU3*' 

650 PRlNTTABC 103 *C 18SPC1*" 

660 PRlNTTABC 10 3' xxxxxxxxxxxxxxxxxxxx" ; 

670 GETA*: IFA* = ' "THEN670 

680 A=VALIA$ ); IFA<tORA>7THEN678 

638 ONAGQT 070 0 . 1 1 90 - 1 230 . ! 290 . 1 330 .1510. 

700 REM xxxxxxx SKRIU LINIECR3 xxxxxxx 
710 PRINT"(CLP.]C7CN"TRrK C BLK 3 U LT8LU3 F 
OR AT FORTSAETTE MED OE FORRIGE t CN3LINI 

ER "; 

720 PRINT "HER. TRYK C BLK 32C LTBLU3 FDR AT 
FACC0MCU3.CCN) DE FAST-! 3SPC3C CN3FR05N 
E LJNIER UDSKREUET, QG ; 

738 PRINT TRYK C BLK33! LTBLU] FOR! 2SPC3! 

CN3AT STARTE flED EN NY LINIE. 

710 GEJ-M: IFAiO l ANDA* O 2 ANDA*<> '3' T 

HEN740\ 

750 IFflii 2 THENSKi= ' FORA=0TOPEEK CGR+3 
0 3- I : PL =0*: G =P EEK C GR-r36t-fl ): IFG >637HENPL =3 
2 

760 . iFAi ■ 2 THENIFG<320RG>95THENPL=61 
778 IFfl* = 2 TH£N£K*=£K*+CHR*CG+PL J* NEXT 
780. AN=-l: TL=B:LN=8 
790 IFAi= 3'-THEN£Ki = -- 

880 PRINT't CLRJC 3CN3F8LGENDE ORDRE FINBE 
S: ".PRINT <RETURN> STOPPER OG OMSAETTER 
LINIERNE 

810 PPINT~ <Fl> STOPPER UOCN AT OflSAETTE 
L IN I ERNE" : PR I NT <F3> [NDSAETTER FLERE" ; 
820 PRINT* TOPIME :PRINT SKRIU LINJ-EN-'-E 
RNE HER: ' 

838 PR1NT~C PUR38800000001 l 111 111 11222222 
222233333333331" ; 

B10 PRINT " 1 231567990 I 231567890 1 231567898 
1231557830! CYN 3" : : PR I NTSK* 

850 PR INT *.l HOM3C 22CN 3L I NI E: " T ABC 1 3 3 TEGN 
:"TABC25 3~IALT TEGN: ! C YN3" 

860 PRlNTTABC 10 ) "FYLDER 1 ALT : LENtSK*3"T 
EGN 

870 GETAi 



880 (C-K'1: IFK = 10THENK-e:PE=PEEKC H25tflN3 

: IFPE>l78THENP0KEl125rAN.PE-l28: GOTO30B 

830 irK=0THENPO|CEl175TflN.PETl28 

900 IFAt=""0RAi = 'CCLRj"0RAi=-[HOM3' THEN8 

70 

910 IF PEEK ( 1 175r AN 3 > 1 2STHENP0KE 1 125 tAN .P 
EEKCH25»flN 3-120 

970 IFA*="ICO3"THENPR=AN-10: EFPR>8THENAN 

=PR 

933 IFAi = -'tCO3*ANDPR<8THEN870 
910 IFAi = -[CN3'*THENPR-AN-H8: IFPR>LENCSK* 
3THENF ORA s 1 TOPR-LEN CSK * 3: SK*=SK*» : NEX 
T:fW=PR-l 

950 IFA* = ICN1 AN0PR<LENCSK*3THENAN=ANt1 

0: 

960 1 F Ai= CCN3 ORAi= ( C03 THENB70 
970 lFAi= ! CU3~THENAN=AN-1:GOTOH80 
980 IF A*= T CH3 ' ANDAN> = LEN C5K* 3- 1 THEHSK* = 
SKtt" " 

990 IF A*="! CH 3 "THEN AN S AN* 1 I GOTO 1 100 
1000 IFAt=CMKU28 3ANDAN* 1 -LENCSK* JTHENSK 
i-LEFT*CSKi .LENCSK* 3-1 3: AN =AN- 1 : GOTO I 100 
1010 I Ffli =CMRt I 20 IT HENSKi=LEFT4C SKi .AN-1 
)*RI GHTiCSK* .LENCSK i 3 -AN 3: AN=AN- 1 : GOTO 1 1 
00 

1020 IFAi=CHR*C133THEN1130 
1030 I FAt = "f F 1 3"THEN196 

1010 I FAt =CHRiC 1131 THENSK* : L EFT 4 CSK* .AN 3 

T''r 2SPC3 " *R I GHT* C SK * . LEN C SK* D-AN 3 

1050 IFA*=CHR*f 1 18 3THENA* = " '*: AN=AN- I 

1060 AN=AN* 1 : IFAN<LENCSK* 3THENSK*=LEFT*C 

SK*.AN 3-»A**RIGHT*lSK* , LENCSK* 3-AN-l 3 

1070 IFAN=LENCSK* 3THENfiK*=SK**A* 

1080 IFA4 = "tF33"THENU60 

1030 IFLENC SK* 3 = SCT HEN 1 130 

1100 TL=AN-JNTCAN/10 3x^0tJ:LN=INTtAN/1B3 

tl 

1MB PRINT"! H0M3 C 18CN3 "SK»" "-'PRINT [ HOM 

]C BLK 3 1 22CN 3 " t A3 C 6 3LN'T CU 3 

1120 PRINT TAB 1 18 )TL "t CV1 -TABC353ANtl"lC 

U3 ""TAeC62 3LENCSK*3"[CU] C CYN3TEGN" ; : GOT 

08?8 

1130 PRINI"C1C03":PRlNT-anSAETTER L INIEP 
NF I " 

1110 FORA :0TOSC- l : P0KEGRt36tA .PEEKC 1121* 

A3: NEXT 

1150 GOTO190 

H60 INPUrtMQMt 20CNISKRIU STARTEiFFR'ET 
OG HUORT JL" ; S ,H: IF S>H THEN I l 00 
I 170 PRINT"! E0][ 37SPC3" 

I IBB SK* ; LEFT * C SK* , S 3 rLEFT* CMR* .H -S JrRIG 
HTiCSK*. LENCSK* ) -S 3: AN =LENl. SK* ): GOTOl IBB 
M90 REM xxxxxxxxx FARUE-SKIFT xxxxxxxx 
1200 PRINT "! CLR3 ! 7CN3HUJLKEN FARUE V\L 0 

u bruge?**: pr !nt"den nuuaerende farue er: 

PEEK(GRt213 
1218 1NPUTFA: IFFA<0ORFA>15THEN190 
1220 POKEGRt21.FA:GOTO190 

1230 RFM xxxxxtxxx START-TEGN xxxxxxxxx 

1210 INPUT"! CLR3I7CN3HUOR PAA SKAERMEN S 

KAL LINIERENE STARTE te-999 3":BT 

17S0 IFBT<8ORBT>999THEN490 

1260 BT=BT-M021: HB = I N T I BT^256 3: LB =BT- C25 

6*MB): AT = 1000*BT 

I 270 P0KEGRt22 .MB: P0KEGR*2l .LB 

1ZB0 BT=BTr 51272; HB=INTCBT/256 J: LB=BT-(2 

56xHB 3: POKEGR r26 .LB : P0KEGRr27 .HB: GO TO130 

1 290 REM xxxxxkxxx SLUT-TEGN xxxxxxxxx 

1300 INPUT - ! CLR3C 7CN3HUOR MANGE TEGN SKA 

L L INIENxLINIERENEC 3SPC3BES1AA AF : SC 

13I0 [FSC<1ORSC>ATTHEN190 

1320 POKEGRt30.SC:GOTO130 

1330 REM xxxxx* LAUE DATAL INJER xxxxxx 

1310 INPUT"! CLR3C 7CN3HUOR HANGE DATA MAX 

PAA H"JER LINIE! 3CH339C 1CU3'*:DL 
1 350 INPUT-HUOR MANGE TEGN MAX PAA HUER 
LINIEC 3CH380r 1CU3";TL 

1360 INPUT"HUOR MANGE TEGN SKAL MED! I 3SP 
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CjIZfllSCg] : Tpt: IFTn>255THENl9a 

1378 INPUT'SKRIU DEN F0RSTE L I NIE ,Ll NlEft 

rSTflNW7Cil16.0R00. 18f tBCurrFL.BF 

1 398 lFrL<0ORf»F*300tf L>63999THEN490 
1330 nL= 1 : 118 =GRt 36* Tf1; flD = INT ( CHB-GR )/TJL 

l:US-0;DI=0 

1400 FOROI =ITO30B:L = FL+flfJ(CflL-I ]:Lt = RI6H 

T*f5 1R**L).S):UL*lOL DO TO 

1110 D[ I fDS.PL M0:FORDfl-BTODL-l 

1120 DO* -SIR* I PEEKCGRrOflt-p J )): PL =PL *LENf 

DA* 1 

1 030 IFPL>80ORPL >.TLTHEN13S=0ft: Dfl^DL: MU-flL 

NCXTiGCTOlflTB 

1 440 ]FOI iUn = Tf1*36THENDl c l=DL: r«U:flL:flL =301 
: NEX I : Gf J T 0 M 70 

14*50 DLttOL )-UL*(flL)*RIEHI*CDfli.Lt'NCUfll 1 
-!)t \ : NEXT 
1160 (1U-0L: DS=Ofl 

1470 (Jl * f l*1U 3 =L E F I * ( DL t ( I1U 3 , L EN ( DL i [ NU 3 3- 
l ):PRlNTULH;piy 3:NEXI 
1100 PRINT TRYK EN TflST 
1190 GEIP4-: IF04 = 1HEN149B 
1500 GOTO430 

1510 Ren * d.l. pen skoern &. printer * 

I5Z0 Un=PEEKCGRt30):POKEGRi-30. 1 
1530 PRINT T CLRJ OIL DU SE DATA Pflfl LREU 
JSl OFF IKflFRn ELLER [ REU1P[ OFF] R1NTER? 
1S48 GETOt: If A*O"S"flN0F»i<> P THEN 1548 
1550 LI =0: INPUT SKRIU DEN F0RSTE.OEN SID 
STE Dflrn-LINIE' :D1 ,D2: I FD2>300 THEN1 60B 
1560 PRINT"! CLR]": IFAi = P THEN0PEN4 .4: CM 
D4 

1570 FORO=dl T0D2: PRINTDLit A 1- If A* ="S"TH£ 

NL I -L I * I NT [ LEN ! DL* t A 3 3/40 ) 1 1 

1590 IFLl-22rHENLI=0:GOSU01610 

1590 NEXT: I FA* - 'P*'THENPR INT »4 : CL0SE4 

l 600 G05UB I 6 1 0 : PQKEGR » 38 .U«: GOTO490 

1610 PR I NT * T RYK EN TflST FOR AT FORTSpiETT 

f. " 

1620 GETB*: I FBt ; ~ THEN 1 620 
1630 PRINT"! CLR) " : RETURN 

1610 REP1 »>i"»i« SflUE DATA uxixxiva 
1650 PRINT -f CLRJI 7CN1UJL DO SAUE Pfl[CO][ 
CUJ.CCNJ Bfl[CO]CCU).CCN)ND ELLER DISK?" 
1660 GET04: I FO* < >~"B 'OlNDfl* < > "0" THEN I 668 
1670 INPUT""! CNJNP.ONET Fflt CO ft CO] .1 CN 1 FI 
L EN " = F L S 

1680 INPUTTCN1SKRIU DEN NUflPIERET PMC01 
CCUl.tCN] DEN f 0RSTE .SIDSTE DflrflLINIE";D 
1 .02 

1690 IFO2>300OROl >02OR0l <1 THEN-190 

1/00 PRINT-0K.C2SPC]UENT":ftr=B:F0RDL=DlT 

0D2 

1710 PDKESUtftT .B:BY=LENCDI.1(DL 3)-3»SUiOT 

: BH--IN r CBY/-2f.G JS BL =B'Y-BH*756 

1720 POKESU* I *0T .BL : POKFSU* 2*(\ I ,BM: HY-UP, 

I fl EFT*CDLltDL 3.5 3 ): BH-- 1 NT ( BY/256 J 

1730 BL =BY-BH* 256: POKESU t3»nr ,BL:POKESUt 

4 tflT »8ff i P0»CESU-r5*-flT . 131 : AT = 0T*6 

1740 FORTGniTQLENtDLtCOL)) 

1750 POKESU*OT .ASCCM D*f DL* COL 3.TG.1 3 J:A 
T =m-M: NEXT: NEXT 

1760 F0Rfl=BT04 : POKESU *0*-0T . 0: NEXT : POKESU 
*3 tflT. 65 

1770 BY=SU*3i01 :BH-lNTfBY/256 3 : BL=BY-BH* 
256:DU=B: IF pi ; ' B" THENDU : 1 

1708 PR T NT " t CLRJt 7CNJP0KE43. 1 1 3: POKE44 . 1 
IBipOKEIS/'BL" :P0KE46."BH 

1798 PRINT f 2CNJ5flUE**CHRlC31 3tFL1tCHR$C3 

4 3 ' " . " (JU 

1000 PR [ NT " t 5CNJPOKE43.1 : P0KF4 4 . 9: P0KE45 
.'"SUC 1 3 " : P0KE4 6 , " SUf 2 )" : GOTO500r HOfl )( 4CN 

3" 

1610 POKE199.5:FORnMTO5:POtcE630»P.13:NE 
X I : END 

1B20 REM JB-LOGO DfUflLINIER x*xxx 

1830 D0rn32 .42 .42. 42. 12. 42. 42. 42, 42. 42 .4 
2.47.42.32,6.18,25,19.32.32.12.9.14.9 



1640 DflTfiS. 10.32.42.42.42.42,47.42.42.47 
.42.42 .42.4 7.32 .32 .42,21 .4. 1 . IB ,2 ,5. L0 
1850 00 104. 5. 70. 32. 43. 57. 56. 53. 32.1 .6.32 
.32.10.5,16 .16 .5,32.2.21 .14 .4. 19.7.1 .1 
I860 UOTfUS .4 .42.32 

1670 DO I 032 ,42 .42 .42. 42, 47, 17, 32. 5. 14 .4 , 
14 .21 .32.5.70.37. 18.2.45.13 .15 .6.28.45 
1880 DO roi 6. I 8. 15. 7. 18.1 .13.32.42,42,42. 
42.12.42.37 



(CONTROL Sun FOR FRYS LINIER 



I 08 


143 


113 


227 


120 


37 


1 30 


15? 


140 


194 


150 


194 


160 


121 


170 


147 


190 


186 


190 


144 


2BB 


214 


210 


224 


220 


144 


230 


700 


240 


144 


250 


248 


269 


3 


270 


126 


780 


242 


29B 


144 


300 


144 


31» 


75 


323 


3 


330 


59 


348 


176 


350 


92 


360 


105 


370 


51 


30B 


103 


390 


784 


408 


232 


410 


31 


420 


144 


438 


65 


44B 


157 


450 


26 


460 


110 


470 


39 


180 


221 


490 


49 


500 


41 


510 


158 


528 


245 


530 


158 


54B 


191 


550 


158 


560J 


IS7 


570 


159 


500 


128 


590 


158 


600 


59 


610 


159 


620 


150 


630 


158 


640 


68 


650 


158 


660 


141 


670 


106 


G8B 


117 


690 


176 


700 


254 


710 


165 


720 


221 


730 


211 


740 


40 


750 


163 


760 


38 


770 


B 


7B0 


143 


790 


1 20 


000 


19 


010 


250 


970 


210 


830 


1 16 


840 


128 


958 


I9l 


960 


156 


970 


6 


890 


255 


990 


1 


900 


232 


910 


198 


920 


226 


930 


241 


94B 


135 


950 


144 


960 


217 


9/0 


91 


900 


65 


950 


718 


1000 


2S2 


101 B 


211 


1020 


130 


1838 


175 


104B 


248 


1050 


63 


1060 


238 


1070 


142 


18B0 


Z19 


1090 


21 


1 100 


36 


1110 


200 


1 170 


131 


1 130 


131 


1 140 


21 1 


1 150 


39 


1 168 


234 


1 170 


14 


1 180 


34 


1 130 


219 


1200 


36 


1210 


205 


1220 


03 


1230 


204 


1210 


183 


1250 


234 


1260 


14 


1270 


37 


1280 


144 


1230 


134 


1300 


100 


1310 


213 


1328 


95 


1330 


13 


1340 


186 


1350 


202 


1360 


54 


1370 


66 


1388 


187 


1390 


193 


1400 


21S 


1410 


40 


1420 


13 


1430 


186 


1440 


143 


1458 


222 


1460 


234 


1470 


22 


!4B0 


54 


HSR 


155 


1500 


39 


1510 


142 


1520 


214 


1530 


56 


1548 


169 


1550 


219 


1560 


197 


1570 


B 


1590 


227 


1S98 


115 


1600 


239 


1610 


19 


1620 


152 


1630 


56 


164B 


76 


16SB 


104 


1660 


142 


1670 


67 


1608 


203 


1 690 


222 


1700 


95 


171 8 


I 1 1 


1720 


109 


1730 


G9 


1740 


175 


1750 


255 


1760 


I0L 


1770 


74 


1780 


49 


1790 


234 


1880 


149 


1810 


173 


1820 


BB 


1930 


125 


1010 


151 


1850 


156 


I860 


1 1 1 


187B 


149 


1980 


132 
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AF 

I THYGESEN 
4 D 
IING 



TIL COMMODORE 64: 



5 PRINTCHRU83 

10 PRINT TCLR3": Yi= T 3S/S:H RE"U3**-BBRSSP 
\L-XTt OFF3C3S/S] 

20 FORA =9T019: PRINT TABC A 3; Yt : NEXT 
30 FORA=19T08STEP -1 : PRJNTTABC A 3; Y*:NEXT 
40 PRINT CISCO] DETTE SPIL ER ': PRINT T4S 
PC 1LAUET AF 

45 PRINT jt CN 1 JOHN BACH THYGESEN ' 
50 FORfl=lTOZ500: NEXT 

70 REfl*** START UERDIER PAA TAULEN**X 
B0 KUf 1 )=75«KU£2 3=56: KUC3 3^25: KUC4 3=36:K 

UC5 )-iS:KUC6i ? i 9:0=3:^=1000 

100 PRINT ECLRjt 7CN3C7CH3CF1 J NYT SPIL 

102 PRINT T7CH3CF33 REGLER 

110 PRINT T 7CH3(F53 KURS UAERP1ER"' 

112 PRINT I7CH3CF73 START PENGE 

120 UAIT2B3.64: UAIT283 .63: GEJA* 

125 IFA* = T F3) "THEN200: REP1 REGLER 

130 IFF»*= TF13 THEN155:RtTI INPSKR.AF NAY 

NE 

^35 IFPi*= TF5 j THENZ74: REH IND5KR.AF KUR 

H0 I F A* = "C F73 "THEN INPUT' t 6CN3r 4CH3START 
PENGE :nn 
115 PRINT T CN]C 63SFC] 
1 50 GOTO 1 00 

155 REn*****«lNDSKRIUNING AF NAUNE**** 
160 PRINT TCLRJC4CNJC4CH]xm[REU3 lNDSKR 
INNING ftp NflUNf" I OFF] xxx 
162 PRINT T 2CNK6CH3SKRIU JERES NAUNE" 

165 PRINT 1 2CN3[ 7CHJHUIS PER IKKE ER FLE 
RE ' 

166 PRINTT9CHINAUNE SflA TRYK PAA RETURN 
T 2CN3 ' 

170 FORIM1T03: INPUTBiCU ]: E =E+ 1 : IFBUU D=" 
T HENE -E- 1 
175 NEXT'.U:0:GOTC290 

200 PRINT TCLR3C2CN][ 3CH3»«t REUJxxREGLE 
R FDR B0RSSPlLxxtOFF3»** 

205 PRINT T CN JC 3CH3QETTE SPIL GAAR UD PA 

A AT NAAfl 1SPC35B000 KR . ' : 

210 PRINT" P0RST PAA UEROI TAULEN . 

215 PRINT T 3CH3DER ER OGSAA EN BANK HUOR 
MAN KAN 

216 PRINT f 3CH3LAANE [ .P1EN DOG HBJEST 10 
000 KR , " 

220 PRINT r 3CH3FOR LAANER PAN HERE SAA E 
R HAN UPEC6SPC3AF SP] LL£T . 

230 PRJ NTT 3CH]NAAR DER STAAR 0 KR. PAA 
KONTOEN SAAf 5SPC]BL[UER ALT NUL STILLET" 
2^0 PRINT" r 3CH]I!AN KAN K0BE OG SAELGE TI 
u OE KURSERL 4SPC 30CR EK GAELDENDE 
245 PRINT T3CH]0G PET KOSTER 10 KR . HUER 

GANG DETC7SPC1ER FNS TUR . " 
250 PRINT'TCN U3CH3RESTEN SKULL E GERNE G 
AA AF SIG SFLVJ" 

260 PRlNTTCN]t7CHHREU']GOP FORNBJELSE . . 
1 OFF 3 " 

270 PRINTT 3CN3C 20CH3TRYK PAA EN TAST ' '• U 
AIT203 . 64; dAI T203 .63: GOTOl 00 

274 PRJNTT CLRH5CNH7CH3INDSKRIUNING AF 
KURSUAEPICRC 5CNJ 

275 INPUT ( 2CM30LIE iKUCl 3: INPUT T2CH3JE 
RN'iKUC2): INPUT T 2CH3FI SK ;KU(3 3 

277 INPUTT 2CH3K0D ; KUC4 }: INPUT I 2CH3UL 
D "iKUC5 ): INPUT [ 2CH1KORN iKUf 6 ] 



285 GOTO 100 

290 OIHAtC17):OiriL*C703 

293 F0RA=1T03:PS(A 3=HH: US[A)=PS(fl 3! NEXT 
235 GOSUB300: GOTO5000 

300 REH**"xOPTEGNlNG AF 5KERM********** 
31B PRINT "TCLR][CN3teCH3***tREUJx;*x BBRS 
-SPIL **xrOFF]««« 

32B PRINT T REU] [ S/T^3AKT IERC S/A] KURSC S/A 3 
1 .SPILL. r S/Z32. SPILL. T S/Z33.SPILL." 
325 A*C03=T 6SPC3 : FORA = 1 TOl 7S TEP2 : fl* t A 1 
= I 6SpC3 NEXT ™' 
338 A*C23^ OLIE :fliC4)=- JERN :A*(63 = 
FISK •:A*C8J= KBD[2SPC]' : AM103=" ULD 
I 2SPC3 " 

335A*fl23= KORN :A*U43 = PENGE ": A*t 1 
6 3= ' UERDI ' 

3^0 FORA=0TOI7:PRINT t REU3C S/A J A*C A 3: ' 
TS/A3C 4SPC][ S/fl ][ 9SPC3C S/Z]L 8SFC1E S/2T[ 8 
SPCI'iNEXT 

350 REP1»x*x*x»SET NAUNE pflftxxxxxxx 

360 PRINT rHOn3C2CN3-: PRINTTABC 133;B*CI J 

:TABC22 3;Bif 2);TABC3i J;B*(3) 

385 GOSUB400:GOSUB500: GOSUB6B0: GOSUB7B0: 

IFU=ETHENGOSUB2800 

3B6 RETURN 

400 REn^^xxx?:?tSET KURS f>m***xxxxxx 

403 PRINT rHOH3E3CNJ":FORP-iT01fiSTEP2:PR 

INTTCN][8CH3[3SPC]":NE)(T 

410 FRINTT HOflJC 5CN3 " TflB( 8 3KUC 1 3 

^20 PRINT'f CN]"TflBC8 3KUC2 3 

430 PRINTTCNI-TflBCBlKUO] 

440 PRINT*tCN3"TflBC33KU(4 3 

450 PRlNT'rCN3"TflBC83KUC53 

460 PRINT TCN3"TABC8 3KUC6 3: RETURN 

500 RF[1**TfiL TIL 1. SPlLLERx;w*xx 

503 PRINTS HOI1IC 3CN]": FORfl^l TD1SSTEP2: PR 

INTT CNJl 14CH1[5SPC]-:NEXT 

510 PRINT T HOM3E 5CN 1 "TAB( 14 30SC1 3 

520 PRINT "f CN] "TftBC 14 J JSf 1 J 

530 PRINT "rCN3"7flBCl4)FS(n 

54B PRINT TCN3 "TflBC14)KSCl 3 

550 PRINT T CN3 "TflBC 14 JUSC 1 3 

560 PRlNT'TCN3 M TftBCl4JRSCl 3 

S7B FRINTT CN} 14 f ABC 13 JpSf I 3 

580 PRINTTCNJ*TABC13 1USr 1 3: RETURN 

600 RE Mx» TAL TIL 2. SPILLERxxxt.kx 

603 PRINT IHOH3C3CN3":FORA=1T015STEP2:PR 

TNT f CN ][ 23CH3T 5SPC ]"" : NEXT 

61 0 PR I NT "t HOflJt 5CNJ-TABC23 JOSC2J 

62B PRINT •TrNJ-rflBC23)JSC2J 

638 PRINT"! CN3"TflB(23)FSt23 

64B PR I NTT CNI"TABf 23 3KS( 2 ) 

650 PRINT-rCN]"TAB(23)US(23 

660 PRlNTTCN]"TflBC23 3RSf23 

670 PRINT"[CN3 TOBC22 3P5f23 

688 FRINT"TCN3 'TABC22 3US(2]: RETURN 

700 REf1«TAL TIL 3. SP RlER*"**** 

703 PR INT T HOf13f 3CN] " : FORA = l T015STEP2: PR 

iNT'f CNJt 32CH3T 5SPC]" 

705 NEXT 

^10 PRINT"! HOTUC 5CN3"TAB[32 30S(33 

720 PR INT"r CN] ** TABC 32 3 JSf 3 3 

73B PRINT"TCN]"TABC32 3FSC33 

740 PRINT-rCN3"TflBC323KSC33 

750 PRiNT"rCN]"TAB(323USC3] 

760 PR INT "f CN1 "TABC 32 3RST3 3 

770 PRINT TCN]"TABC31 3PSC33 

780 PRINT 'I CN]" TABC 31 3US C 3 3: RETURN 

1500 REf1*«« INPUT UED K0B OG SALGxxx 

1503 I FP,SCU 3 CI TllFNRETURN 

1504 IFLLCU3>10000TMCNGOSUB43B0: G0SUB2BB 
B: RETURN 

1505 Jtfl MOftll 22CN3C2CH3" 

1506 J*(23-*T 67SPC3" 

1510 PRINT J IC 1 ): Bi[ U 3" HAR TUR NU: K00E/ 

SAELGE C ts- J" 

1520 UAIT2B3.63: GETPi: IFPt = '*-ORP»="-"TH 
FN I 540 

1530 GDTDI520 
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1518 FR]NT.I»n ); J4CZ J; J4tl r'HUflO SLAGS'" 3 
: 1NPUTK4 

1550 irK*-"OLlf"THrNF=l:GOTO1620 
1560 IFK*^-JFRN"THENF=2:GOTO1620 
1 570 IFK* = 'FISK"THFNF=3:G0T0I62B 
I588 1FK4^*K0L)"THCNF=4: GOTO1620 
1 590 IFK4 ""ULD"THENF :5:GOTOl620 
I 600 IFK* --"KORN"THFNF =6 : GOTO 1 620 

leva GOTO1540 

1620 PRINT JtC I); J4C23: J*C1 3"MUOR MANGE E 
NHFUER":* TNPUTL 

1 623 IFFCEKC 1 1 05 XM 29THENGOSUB300 

1625 IFF4^'* THEN170B 

1630 IF(PStuJX101> L*KUtF 1THEN1900 

1640 PRINTJ4M 3J*C2)JU DV'SAA MANGE PEN 

GE HflR DU IKKF >" 

1650 PRINT"rCO)t4SPCHTRYK PAA) EN TASTI) 

:UAIT203 .63: GOTO1620 
1700 REn****CNHEDER UED MINUS 
1710 IFF = lTHrNOSCWXOSCU)-L: IFOSCW3<0THE 
NOSCU 3=05Cul 1+L: GOTO 1800 

1720 IFF =2THFNJSf U)-JSfU3-L: IFJSCUX0THE 

njs(u j^js(UHL-.GaroiS00 

i730 IFF=3THFNFSrW) -FSCW1-L: IFFSCUIK0THE 
NFS f U 1 --FSf U XL : GO TO 1000 

1740 IFF=1TMFNKSf UI)-KSfUJ-L: IFKSC.UX0THE 
NKSf U 3=KS(W XL: GOTO1800 

1750 IFF r 5THENUSf W J-OSCU J-l: IFUSCWXBTHE 
NUSCUXUSCU XL: GOTO 1800 

1760 IFF=6THCNRSfW] = RSCU)-L: IFRSCUXBTHE 
NRSf U ) -RSTuJ )*L: GOTO1800 
1770 PSflJ)^PSrwji-KUCF J*L-10 
1775 G=USCU3*tCUC5XRS[U )*KUC63 

1780 usrwj-.psrwit-Qsrw )*kuu 3+jstu)*kuc2) 

*FSCU1)*KUC3XKSCW)*KUC4 3*G 
1730 GOTO1390 

1800 PRINTJitl 114(2); J4C1 ):"SF*fl P1ANGE AK 
TIER HAR DU IKKEf" 

1818 PRINTTCOH4CH3CTRYK PAA EN TASTIT 
iUAIT203.63;GOroi620 

1900 REf1*«*ENHEDrR UFD PLUS ********* 

1910 IFF = lTHENDArun-0Sf4d]tL 

1920 IFF=2THENJSCldD-JS(UHL 

1930 IFF=3THFNFSCUXFS(UXL 

1940 IFF-4TMFNKSf ul ) = KSfW)+L 

1950 IFF=5THFNUSCUl-UStU)+L 

I960 IFf -6THENRSCU3 ; RSrU)+L 

1970 PSrtJl=PStiJ)-CKU(F)*L+i8) 

1975 6 = USCU)*KUC5XRSCW XKUC63 

1980 USCU)^PSrU)*-OSfU)*KUn XJS(W)*KUC23 

+FSlU)*KUC3 3i-KSCU)*KUC4 3+G 

I 990 IFP<;fiJ)<lTHFNGOSUS4300 

2000 PR INT J* tl )J«C 2 ):ONUGOSUB50B, 600.700 
2013 RETURN 

2090 REM***FORDELlNG- TIL KURSTflL**** 

2100 R = INT tRNDC 2? 1*9 3: 0NRG0TQ21 10,2120,2 

1 30 . 2 1 4 0 .4200 . 4 1 50 . 4 1 00 . 4050 .1000 

2110 R= INT tRNDC 2? 1*9 3: ONRGOTO3010 .3050 . 3 

100.3150.3200 ,4000.2140 ,3258,3350 

2120 R = INTCRNDC27 1*9): ONRGDTO3250 ,3300 . 3 

350 , 3400 , 3150 , 3350 ,3000 ,4200 , 3580 

2 1 38 R = IN T f RND f 27 1*9 3 I ONRGOTO3508 . 3550 . 3 

600 , 3650 , 3700 . 3000 . 3300 , 3950 . 365B 

2140 R= INT f RNDC 27 1*9 1: ONRGCT0375B , 3800 , 3 

850 . 3900 , 3950 . 3350 ,4/200 , 3ZB0 , 3 1 00 

2190 REM***STYR1NG AjF KURS UED K0B*%* 

2200 IFPt="-"THFMZ508 

2218 IFL>15flNDKUCF 3C15THENKUCF XKUCF3* IN 
TCRNDC t 3*3 ) 

2228 I F L >20ANDKU C F X 1 5THENKUC F ) "KU C F 3+IN 
TCRNDtt 3*3 ) 

2238 IFL>20flNDKUtF K25 T HENKU( F 3 -KUC F 3+ I N 
T ( RND ( 1 3*2 3 

2248 IFL>40flNDKUCFX25THENKUCF 3=KUCF )tIN 
HRNDC1 3*3 3 

2250 IFL>4CflNDKUrF3<25THENKUCF)=KUtF3+IN 
TfRNDC 1 3x3 1 

2260 IFD7BANDKUCF 3<55THENKUCF )=KUCF 3+IN 
TCRNDC I 3*2 3 



2266 IFD7BANDKUCF 3<75THENKUCF )=KU(F )tlN 
TfRNDC 1 3*5) 

Z27B IFL>2B0ANDKUCF)<25TMENKUCF)=KU(F)+I 
NT f RNDC 1 3*71 

2275 IFL>2B0flNDKU f F 3 <55THENKUC F 3 -KU ( F 3* I 
NTfRNDtl )*3) 

2276 IFL>200AMDKUCF3<75THENKUCF )=KUCF3+I 
NTfRNDf I 3*6 3 

2290 IFL>300ANDKUCF3<25THrNKUCF)=KUCF)tl 
NT r RNDC 1 3*6) 

2285 IFL>300ANOKUCFXS5fHENKUCF XKUCF 3*1 
NTCRNDC 1 3*4 3 

2286 IFL>3B0fiNDKU f F X75THENKUC F XKUCF 3+ 1 
NTfRNDC I 3*9) 

2290 TFD400ANDKUCFX25THFNKUCF XKUCF 3+1 
NTCRNDC 1 3*7 l 

2295 IFL>400flNDKUCF 3<55THENKUC F XKUCF 3*1 
NTCRNDC 1 3*5 3 

2296 IFL >480ftNDKU tF X75THFNKUC F )=KUCF 3+ 1 
NTCRNDC 1 3*4 ) 

2 300 I FL >6B0ANDKU f F 3 <25THFNKU( F ) =KU CF 3*1 
NTCRNDC 1 )*B ) 

2305 IFL>600ANDKUfFX55THFNKUCF 3-KUCF J+I 
NTCRNDC 1 )*6 3 

2306 IFL>608nNDKUfF X75THENKUCF XKUCF XI 
N T f RNDC 1 3*5) 

2310 IFL>900flNDKUCF X23 1 HFNKUC F J = KUC F XI 
NT f RND C 1 3*9 J 

2H5 JFL>900ANnKUfF X53THTNKUf FXKUfF XI 
NTCRNDC I )*V) 

2316 IFL >900nNDKU CF ) <75THFNKU C F XKUCF 3+ I 
NTCRNDC 1 3*6) 

2320 IFLM508ANDKUCF X25THENKUCF )~KUCF 3* 
I NTCRNDC 1 )*1 1 J 

2325 IFLH500ANDKUCF X55THENKUCF XKUCF 3+ 
I NTCRNDC I )*9 ) 

2326 IFL>1500flNDKUCF X75THENKUCF 3 =KU CF X 
I N T C RND ( 1 )*7 1 

2330 IFL>3500ftNDKUCF X25TMENKUC F ) =KU C F X 
INTfRNDt 1 3*18 J 

2335 IFL>3500f*NDKUCF X55THENKUC F ) =KU C F X 
!NTCRND(U*131 

2336 IFL )3500ANUKUC F ) <75 THENKU C F ) "KU t F )t 
INTCRNDd 3*10) 

2500 REH HUIS PS= MINUSr 16S/+) 

2510 IFL>15ANDKUCF 3< I5THFNKUCF 3-KUCF )-IN 

TCRNDtl 3*3 3 

2520 IFL >28ANOKUC F X 15THENKUCF )=KUCF 3-IN 
TfRNDC 1 )*3T 

2530 IFL>20ANDKUCFX25THENKUCF)-KUCF 3-IN 
TfRNDC I )«2 3 

2540 lFL>40flNDKUf FX25THENKUCF )=KUCF 3-IN 
Tf RNPCl )«3 1 

2550 1FL>4BANDKUCF X25THENKUCF 3 =KUCF )-IN 
r CRNDf 1 3*3 3 

2560 IFL>70ONDKUC F 3 <55 THENKU CF 3 -KUCF 3-IN 
TCRNDC I 3*ZJ 

2566 IFL >70DNDKUt F 3<75THENKUt F 3=KUCF 3-IN 
TCRNDC 1 3*4 1 

2570 IFL >200ANDKUCF 3 <2STHENKUCF )=KUCF 3-1 
NTCRNDC 1 3*5) 

2575 IFL>200ANDKUCF3<55THENKUCF )=KUCF)-I 
NTCRNDC I )*31 

2576 IFL>280flNDKUCFX75THENKUCF 3-KUCF 3-1 
NTCRNDC 1 )*2) 

2588 I FL>308flNDKUCF ) < 25 THENKU CF )=KUCF)-I 
NTCRNDC 1 )*61 

2585 IFL>300flNDKUCF X55THENKUCF )=KUCF)~I 
NTCRNDC 1 W J 

2586 IFD300ANDKUCF X75THENKUCF 3-KUCF 3-1 
NTCRNDC 1 3*71 

2590 IFL>400flNDKUfF )<25THENKUfF )=KUCF 3-1 
NTCRNDC 1 3*71 

2595 IFD400ANPKUCF 3 (55THENKUCF 3=KUCF 3- I 
NTCRNDC 1 )**S) 

2596 I FL >4B0fiNDKU CF 3 <75 THENKUCF 3 -KUC F 3- 1 
NTCRNDC 13*11) 

2600 I F L >6B0ftNDKUC F X25 THENKU t F 3 -KUCF 3- 1 
NTCRNDC 1 )*8) 
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2605 IFL>6BBflNDKUfF3<55THENKU(F3^KUCF3-I 
NTf RNDC1 3*16 3 

2606 IPL>6BBANDKUfF3<75THENKUtF3=MJr_F3-I 
NFfRNDCl 3*5 3 

261 0 lFL>900fiNDKUCF 3<25THE NKUf F 3=KUtF 3-1 
NTfRNDCl 3*9) 

2615 IFL>9B0flNDKU(F3<55THENKUCF3=KUCF 3-1 
NTCRNOd 3*7 1 

Z6I6 IFL>300f=IND<UrF3(75THeNKU[F3--KUCF)-I 
NT f RNDf 1 3*20 ) 

26Z0 IFL>1500flNDKU(F)<25rHfNKUCF3^KUtF)- 
INTCRNDC1 3*11 3 

Z6Z5 I FL > 1580ANDKUf F K55THENKUCF 3 -KUCF 3- 
INTtRNDt 1 3*9 3 

2626 I FL > 1500ANDKUC F 3 <?5THENKU(F 3 -KUCF 3- 
IN T CRND( 1 3x7 1 

2630 IFI. >3S00nNDKJf F3^25THFNKUCF3^KUCF 3- 
iNTfRNUf I 3*183 

2635 I FL >3S00ANDKUt F S^SfiTHENKUCF 3 -KUCF 3- 
iNTfRNOCI 3* 1 3 1 

2636 IFL>3500nNDKUtF3<7STHFNKU(F3-KU(F 3- 
INTfRNDf I 3*103 

2760 F0RA=1T06: IFKUC A 3 < =8 THENKUC A 3 = 1 
2765 NFXT 

2778 F0RA = 1TD6: tFKUf A 3>9SThENKUC A 3=99 
2775 NEXT 
2790 RETURN 

2800 RF.n***STVRING AF LYS AU3S*** 

2818 Li( 10 3 = "" f tR0EJDESL0SHEDEN ER STIGEND 

2811 Lteil3="OER UENTES GODT UEJER IDAG" 

2812 L1C12J = "0ER FORUENTES STIBNINSER - 

2813 Lif 13) = -flLriNG ER BLEUET DVERE" 

2814 L*Cl-t)^"PRISTftLSSEGULERIN6EN ER STE 

GET" 

2815 L*tl5)="DET FR BLEUET DVERE AT LEUE 

2820 L*(2B3-"DER ER KOMMET FLERE I ARBEJ 
DE" 

2821 L*f2n- M PRISTftLSREGULER3NGEN ER FAL 

DET" 

2822 Ltf223='*0ET BLIUER BILIGER AT LEUE" 

2823 Li(233="NU SKALDER INUISTERES" 
2874 LtC2«?3 = "KURSFN ER FALDENDE" 

2825 L*C25 3="NU FAAR UI RflflD flL DET HEL 

F" 

2830 Li( 30 3= ' INGEN NYHEDER I DAG" 
2931 LiC313='KURSEN ER STABIL IDAG" 

2832 L4(32 3" 'B8RSEN I LONDON ER ROLlG" 

2833 Lif 33 )- * IKKE DE HElT STORE UDSUING'* 

2834 Lt(343='ALT ER STlLLE OG RDlIGT IDA 
G ' 

2835 l*(353="INGEN NYHEDER IDnG 

29-10 Li(403-"OCR FORUENTCS KRAFT I GE STIG 
NINGER 

2841 L*(41 3-"SAELG GET HELE OG BLlU RIG" 

2842 L*M23-"UENT HED AT INUISTE.RE" 

2843 LtMSl^'DER ER STORE PENGE AT TJENE 

2841 Lif 44 INGEN ARBEJDf flT Fflfl NOGEN 
STFDER 

2845 LtE45 3^"B0RSFN HAR STORT OUFRSKUD" 

2850 Lit501="PANIK PAft LONDON B0RSEN ' 

2851 L1C51 3-" INUISTER ALLE DINE PENGE NU 

2852 L*C52 3^"B0RSEN ER GAflfT FAlIT" 

2853 L*C533-"\'ENT PIED AT SAELG" 

2854 L»C54 J^'KURSEN FR KRAFT IG FALDENDE* 

2855 Li[55)-"0ET GfiAR NEDAD 
2?40 S = iNTfRNOC t 3*5 3 + 1 : fl • 1 0*Q*S 

2945 REH****LYSflUIS PAA SKAFRnrN****** 
2350 FORA=I T048 -Lf N( Li ( fl 3 3: l* CM J -L* tfl 
" '• NEXT 

29GB FTJRB ' 1 rO40: PRI N I " I WW 1 "lCF TtfLiCM 3. 
40 ) 

2920 L*((13^RIGHT*CLttn], t _l'NfL*fn33-l 3+LE 
fTiCL$CPlJ,l 3=F0RA = 1 TQ1 20: NEXT: NEXT 
2980 PRINT"! HOfl 3 1 4 1 SPC ] : Rr TURN 
3000 REH******T ILFElDI GE TAL TIL KURS** 



3010 FORAMTD6; KU( A 3-KUCfl 3t 1 ; NEXT; DM : GO 
TO 2200 

3050 FORfl-tr06:KUCA3=KUtn3t|:NEXT:R = INT( 
RNDt 1 J*6 3+1 : KUCR 3'KUfR 3+1 : 0 = 1 : GOTO 2208 
3100 GOTO2200 

3150 R = INTfRNDCl 3*6 3* 1 1 KUCR 3=KUCR 3 1 1 : 0=3 
;GOTO2200 

3280 R = I NT f RNDf 1 3*6 3*1 : KUf R 3-KUCR )- 1 : 0=3 
:GOTO2200 

3250 FORp=lT06: KUf A 3*KUf R 3+ 1 : NEXT: R=INTC 
RNDf 1 3x6 3* 1 : KUf R 3-KUfR 3* 1 ! 0=2: GOTO2200 
3300 R = I NT f RNDf. 1 3*6 )+ 1 : KUfR 3 "KUfR 3 - 3: 0=5 
:GOTO2200 

3350 R= iNTf RNDf 1 3*6 3* 1 : KUtR 3=KlKR 3+3:0 = 4 
:GOTO2209 

3400 KU(F3-KUfF3M:O = 3:GOTO2200 

3450 KU(F3-KUfF3»-l:O=3;GOTO2200 

3500 KU(F 3-KUtF 3t2: 0=4: GOTO2280 

3558 KUCF 3-KUfF 3t2: 0=4: GOTO2200 

3608 KUTF 3"KUf F 3-1 : 0=3: GO TO 2200 

3650 KUCF3^KUfF3-2:O = 3:GDTO2200 

3700 «UCF3=KUfF3-3:O=5:GOTO2200 

3750 KUCF 3-KUfF 3+3; 0=4: GOTO2200 

3808 KUCF3-.KU(F3-l:O = 3;GOTO220B 

3850 KurF3=KUCF3-l;O=3:GOra2200 

3900 KUTF3=KUCF 3-1:0=3: GOTO2200 

3950 KU(F3^KUCF3-2:O=5:GOTO2200 

1000 FOR^ = i T06: KUf A 3 r KUf 3t I ; NEXT i R= IMT f 

RNDfl 3*6 3H:KUrR3 = KUrR3-i:O=2:GOTD220fl 

4050 R-INTCRNPC I J*6 3tl:KUCRJ'KU(R)-I:0=3 

:GOTD2200 

4100 R = iNKRNOf 1 3*6 3ti; KUtR 3=KU(R )+l: 0-3 
:GOTO2280 

4150 R = INTf RNDf I 3»6 It 1 : KU(R J^KU tR )♦ 1 : 0'-3 
: GOTO2200 
4200 GOTD2200 

4308 0SCU3=9: JSf U 1 =8; FSf Ul )=0: KS f U ) =0: USC 
uJ 1 :0: RSrU3-0:PS(Ul-0:USfU 1-0: RETURN 
5080 RCf1**MUIS TUR ER DET x»x***xxxx 
5010 H-UM:GOSUB1508:RC!n ^PIlLER 
5015 GOSUB2100; REt1*NY KURS 
5020 lFU=FTHFNGOSUBS0S0:U-=B:REn NY RUNDE 
5038 GOSUB400:REn**NY KURS PAASKRIUES 
5040 GOTO5008 

5045 REn«*JUIiP FftULE TIL UDLflflNNING 
5050 K=K+1: IFPSt 1 XI THENU=1 : X=l ; GOSUB60P 
8 

5C*60 IFPSf2 3<1TI-.ENW=2:X=1:GTJSUB6000 

50P0 IFPSf 3 K1THFNUU3. X= I : GDSUB6880 

51 10 IFK=3THENlFLLC13>lTNENU-l:X=l:GOSU0 

7000 

5 1 20 I FK =3THFN I FLLf 2 3 > 1 THENU = 2: X=l ! GOSUB 
7000 

5130 IFK =3THENI FLLf 3 3>1THENU=3: X=l:GOSUB- 
7000 

5200 IFK=3THFNK=0 

5300 REn***»tlUEn MftR UUNPET***** 
5310 (FU^fl 1>5008aTHrNUl=l:GOTOS000 
5320 IFUSf 2 3>50000rMENU -2: GOTOB000 
5330 [FUSf 3 3>50B00THENW = 3: GOTO8800 
5970 IFX=8THENGOSUB2808 
5988 IFX=1THENGOSUB300;X=B 
5990 RETURN 

6000 REn*****UDLArmiNG***x*»x*x 

6003 IFLL(W 1>| 0800 l"HFN,Rr.TURN 

6010 PR I NT" f fLRjr CN31 6CH3**»[ REU3** LAAN 

E-KONTORFT **rt?FF3***" 

6028 PRINT"r CNir 3CH30ET KAN LflDE SIG GBR 
F AT LAANF" 

6038 PRlN r "f 3CHJN0GLE PENGE I COdpUTERBA 
NKENT 

6040 PRINT"! 3CH 1HU IS DU ER INTERESSERET I 

6045 PRINTT 3CHjrDFR SKAL BE TALES AFDRAG 

on - 

6046 PR I NT'T 5TH 3 ™ 3 -K" . RUNDFR3" 

6B50 PRINTT rN)F6CH3ER OU DET ~;BtfU3 
6860 2*="Q-; INPUT"I6CH3 JR / NEJ _ ;Z* 
6070 IFZS-" IA-THFN61B0 
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6080 IFZ* - "I it J " THFNRCTURN 

6098 PR I NT" T 2TQ 1 " : G0T06EBB 

6100 PRINrrrLR]r2CNH3rH]x«[REuj 01 Kfl 

N T ILBYDF r0FF3xxK" 

61 10 rRlNTTrNjr2CH10U KHN SFLU BESTEPIflE 
MUOR™ : PR I NT "f 2CH JHANGE PENCE DU OIL Lflft 

NE ( - 

6113 PRINTT ZCHJMCN NflHR DU SKYLDER HERE 
tfND":PRINT"T2Crt] 10090 KR . ER DU FflEPIG" 
6120 PR1 N T "T CN Jf 2CHIBEL0BET SKflL AFDRflGE 
S HCD 10X" 

6130 PRINT'T 2CH1FDR UUER 3. SP I LLERUNDE " 
6135 PRINT'T 2CH1DU SkYLDER I FORUE JEN "L 
LfUI)"KR." 

61 48 INPUTT CNJF 3CHJUU0R HEGET";p: USf U)= 

us c u ) t p : ul r m ) -ll r u hp : ps c u ) .^ps r w )*-p 

6tS0 RETURN 

7000 REn*«**Mi_BflGE BETflLlNG»*«w 
7003 TFLlfU >10000THt NRETURN 
7010 PRINT'T TLRK 3CN J T 7CH1 ***r REUJ**T ILB 
AGE BETAlING**!" OFF)x*x" 

7020 PR I NT" T 3TNM 4CH1 "Bi CU1" OU SKYLDER 
" LL C U J "KR . 8 ; PR I N T " f 4C N J I EOrtPU f ERBflNKEN 

7025 G-lNTfuLrulJx.l ) 

7026 IFG -0THFNLL CuJ )-0 : RETURN 

7030 PRJNT'T 4fH10G SKftL BETflLE *G"KR,":p 

RINT"r4CH1KAN DU KLflRE DET "':BSCd1 

7010 PRINT'T 4CH1ELLERS KflN PU LflANE f»ERE 

7015 PRJNT'T 3CHJT CNJt CHJDO HAR "PSCHJTKR 

7050 £%-"Q" : INPUT I CN][ 4CH)\JIl DU LfiftNE 
f Jfl s NEJ r ;z* 

7060 Jfl- rnENGDSU06100: GQTO78B0 

7070 IFZ*-"NE1~THCN70S0 
7090 PRINT'T 3C01"- GOTO7B50 

7030 PRINT'T 2CNH CH1"G"K(?. fiT BETflLE UED 

Knssr i inputo 

7100 IF0=GTHEN?12B 

7110 PRINT'T TNirirHIDU SKPL BETflLE "GiPR 
INT'T 6roi":GOrO7090 

7120 LLfUl-l.Lrul)-D:PSrui-PS(Ul-0;OSCU)=U 

sruii-o 

7130 RETURN 

3000 REM k»xUINDERLN KOORESaxiukx 
8010 PRI N f"T CLR J" i FORA=I TO10; PRlNTTfiBCfl J 
B4fW)" HfiR UUNDET r REUjf S/S ] %\ S/S J TILLY 
KKEl OFF]"; NEXT 

8020 PRINT'T 2CNJ[ 10CH1UERDH SiHjLflANt 3CH 
1 1 ALT"' 

8030 PRI NT'T 2rN3f 4CH} "Bt C 1 )" HRR "USCl 3" 
-'"LLC 1 T^'USf I l-LLCI J 
6035 IFF -1 THFNB090 

8040 PRINTS ENJt 4CH]" , Bi(2 J" HAR "USt2r- 

LLf 2 ]" -"US f 2 ) -LL (23 
8045 IFF--2fHtNe090 

8050 PRINT"'CN]r4CH) B*C31" MAR "USC3 5" - 
*'LL(3)"="USr31-LLC 31 

8 1 00 PRl NT'T HOn ] " ; FDRfl = 1 TO 1 0: PRI NTTAB t A ) 
T REOVBifw 1" HAR UUNDETT OFF 3 tS/SJ^CS/S 
URtU) TILL fKKE" i NEXT 

81 10 PRINrThOm*':FORP = lTOl0:PRlNTTflBCP3 
B4fUV HAR UUNDETT REU ] rS/S3*lS/S3 CDFFJ 
T ILLYKKE":NEXT 
8120 GOTD8100 
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136 


166 


205 


170 


56 


175 


83 



200 


104 


235 


25 


210 


16 


215 


149 


216 


206 


220 


139 


230 


1 


240 


12 


245 


128 


250 


132 


260 


67 


270 


Z24 


274 


135 


275 


28 


277 


190 


285 


26 


238 


140 


233 


73 


295 


163 


300 


249 


310 


193 


320 


33 


325 


5 


330 


34 


335 


74 


340 


189 


353 


91 


360 


97 


385 


73 


386 


142 


400 


156 


483 


14 


4 10 


107 


420 


21 


430 


22 


140 


23 


450 


21 


460 


225 


500 


173 


503 


$ 


510 


154 


520 


62 


530 


58 


540 


63 


550 


73 


560 


70 


570 


67 


580 


17 


600 


1 74 


603 


6 


610 


155 


620 


63 


630 


53 


640 


64 


650 


74 


668 


71 


670 


68 


680 


18 


700 


175 


703 


79 


705 


130 


7i0 


156 


720 


64 


730 


60 


740 


65 


750 


75 


760 


72 


770 


63 


780 


13 


1500 


72 


1503 


Z33 


1504 


185 


1585 


163 


1506 


71 


1518 


3 


1520 


23 


1530 


81 


1510 


74 


1550 


117 


1560 


124 


1578 


123 


1580 


11 


1530 


53 


1600 


133 


1610 


83 


1620 


76 


1623 


44 


1625 


115 


1630 


163 


1640 


14 


1650 


45 


1 700 


119 


1710 


249 


1720 


225 


1730 


206 


1740 


232 


1750 


27 


1760 


13 


1770 


45 


177*3 


223 


1780 


53 


1730 


92 


1800 


1ZZ 


1810 


33 


1900 


73 


1310 


IS1 


1920 


142 


1930 


135 


1340 


146 


1350 


167 


1960 


162 


1370 


126 


1975 


223 


1380 


53 


1330 


181 


2000 


67 


2010 


142 


2090 


153 


2100 


38 


2110 


104 


2120 


116 


21 30 


150 


2140 


133 


2130 


163 


2200 


144 


2210 


128 


2220 


121 


2230 


124 


2240 


127 


2250 


127 


2260 


132 


2266 


137 


2270 


177 


2275 


176 


2Z75 


181 


2290 


177 


2285 


178 


2286 


105 


2238 


179 


2235 


180 


2236 


181 


2300 


182 


2305 


163 


2306 


184 


2310 


186 


2315 


187 


2316 


188 


2320 


16 


2325 


234 


2326 


234 


2330 


25 


2335 


23 


2336 


22 


2500 


69 


2510 


123 


2520 


125 


2530 


125 


254 0 


129 


2550 


128 


2560 


133 


2566 


137 


Z570 


176 


2575 


177 


2576 


'178 


Z580 


178 


2585 


179 


2586 


184 


2590 


180 


2535 


181 


2596 


228 


Z600 


183 


2605 


233 


2606 


185 


2618 


187 


2615 


188 


261 6 


233 


2620 


17 


2625 


235 


2626 


235 


2630 


26 


2635 


24 


2636 


23 


2768 


139 


2765 


130 


2770 


150 


2775 


138 


2730 


142 


2800 


205 


26L0 


181 


281 1 


8 


281 2 


235 


28 1 3 


12 


2811 


181 


2815 


45 


28Z0 


156 


2821 


154 


2822 


251 


2823 


17 


282-4 


255 


2825 


54 


2830 


239 


2831 


190 


283 2 


109 


2833 


36 


2831 


127 


2835 


244 


7840 


83 


284 I 


200 


Z84 Z 


222 


2843 


55 


281-1 


184 


2845 


20 


2850 


53 


2851 


37 


2852 


145 


Z853 


1 47 


2854 


12 


2855 


181 


2910 


152 


2945 


I 38 


Z950 


76 


2368 


143 


2370 


206 


2980 


216 


3000 


39 


3010 


91 


3050 


230 


3 1 00 


77 


3150 


72 


3200 


73 


3250 


231 


3300 


7? 


3350 


75 


3400 


242 



34 



34/50 


2*12 


3500 


Z41 


3550 


Z11 


3600 


213 


3650 


244 


3700 


247 


3750 


215 


3B00 


243 


3B50 


213 


3900 


243 


3950 


246 


4000 


232 


4050 


73 


4100 


7Z 


4150 


72 


1200 


77 


4 300 


189 


5000 


1 76 


5010 


204 


5015 


79 


5020 


120 


5038 


99 


5040 


79 


5045 


239 


5050 


21 2 


S060 


121 


5070 


123 


5110 


205 


5120 


207 


5 130 


209 


5200 


143 


5300 


42 


5310 


200 


5328 


202 


5330 


204 


5978 


1 95 


5990 


1 


5990 


142 


6000 


lit) 


6003 


162 


6010 


187 


6020 


165 


6030 


11 


6040 


221 


6045 


s? 



6016 


31 


6050 


82 


6060 


6 


6070 


248 


6080 


17 


6090 


142 


6100 


61 


6110 


155 


6115 


205 


6 120 


74 


6130 


59 


6135 


63 


6110 


217 


6150 


142 


7000 


187 


7003 


1 62 


7018 


20 


7020 


78 


7025 


74 


7026 


69 


7038 


136 


7040 


149 


7045 


1 32 


7050 


1 IS 


7060 


15 


7070 


83 


7080 


31 


7090 


82 


7 188 


63 


71 10 


138 


7120 


48 


7130 


142 


3000 


91 


30 LB 


80 


8820 


201 


8030 


225 


8035 


43 


8840 


233 


904S 


44 


6050 


218 


8 188 


38 


81 10 


208 


8120 


82 
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TIL COMMODORE 64: 



1 PTHINf 66 ].5(66 3.f t66).WC66J.UC66].PC66 3 
.TC 12) .T11C123.T24C 12 J.T3*{12] 

2 RUPU2 

10 F0RX=1T065:REAPN(X].S(X].ECX).UCX).U( 
X1.DCX):nEXT 

25 FORX=lTD12:READTlit>O.T2*CX).T3*(X),T 

(X J; NEXT 

58 PRINT'TCLRJ 

51 PRINT T 10CN] : PRINTTAB( 18 3 PAA EUENTY 
R I BJ ERQET" 

52 PRlNTTflBtll TAF STEFFEN BRAUNER' 

53 PRINT 'T3CHJTESTET AF LARS PEDERSEN' 

54 PRINT' tSCNH 2CH1 INSTRUKTlONER ?" 

55 GETfU: IFA*^ THEN55 

56 IFfli = ' J' THENGO5UB9500 

100 REII "*UDGANGE**X 

101 DATA8 .0.0.8.0.2 

102 PATAB .8.0.8 . 1 .0 

103 PATAB .8 .8.0.0 .0 

104 PA TAB .8.0.13.8.8 

105 PATAB .8.29.8.8.0 
186 DATA8.38.B,0,B,B 

107 PATAB.0.8.B.B.8 

108 PATA7.9.B.B.B.8 
109> PflTPB.18.il ,8.8.0 
118 PATP9, 23.0,0.8,0 

1 1 1 PATA0 .0.0,9,0.8 

112 PAFAB,B,0,13,0 t 13 

113 PATAB, 8. 4. 25. 12 .14 
111 PATAB, 15, 0,0,13.0 

115 PATAU, 1?. 18. 16 .0.0 

116 PATP0 ,0.15,0,0,0 

117 PATA15.0.B.0,B.B 

118 PATAB .0,0.15.0.0 

119 PA TAB .8,12.28,8 .8 
1ZB PATA0,0,19,61.0.0 

121 PA TAB .0.0.22.0,0 

122 PATA0 .0.21 .0.8.8 

123 PA TAB ,26 . 1 3 . 10.0,0 
121 PA TAB .0.0.0.0.0 

125 PA TAB ,28.13,0.0 .8 

126 PATAZ3,28,27.Z6,0.0 

127 PATAB ,21 .28 .26,8,8 

128 DATA25.0.28.27.0.0 

129 DATAB.B.38.5.8.8 

130 DATA8 .0.31 .29.0 .0 

131 PATAB .8,0,30.8,8 



132 PATA33.8.8,0,0.0 

133 PATAB. 3Z, 0,0. 8.0 

134 PATAB. 35. 8. 8, 8. 8 

135 PATAB. 8,36. 0,0,8 

136 PATAB. 8.37. 0.0,0 

137 PATAB. 0.38. 36. 0.0 
136 DATA6 .0 . 0,8.0.0 
133 DATA38.0.42.37.0.0 
11B PATA0.0.1I .8.8.8 

111 PATA12.0.41.40.0,0 

112 PATAB. 0.0. 38.0 .0 

143 PATAB. 44. 0.0. 0.0 

144 DATA43 ,0 ,45 .41 .0.0 

145 PATA0.B.46.44.0.B 

146 PATA0.0.0.45.B.47 

117 PATA0.0.Q.0.46.48 

118 PATAB. 0.0. 0,47, 57 
143 PATA0, 0.0.0 .0,0 

150 PATA50. 51 .52,50.0.0 

151 PFUA50.56.55.S1 .0 .0 

152 DATA52.53,54.5B,0,8 

153 DATA52. 52,53.53.0 .8 

154 PATA54 .51 .56.52.0 .0 

155 DflTA55.55.57.5l .8 .8 

156 PATA56.56.56.54.B.B 

157 PATAB. 8. 58. 8, 48.0 

158 DATAB.B.59.57.0.B 

159 PATAB. 8.62. 58. 0.0 

160 DF*TA0,62.0.8.8,0 

161 PATAB. 0.0, 62. 8, 8 

162 PflTA6B.63.6l .59.0.8 

163 PATA62, 0.8. 0.8.0 

164 PATAB. 0, 28. 0.B ,0 

165 PATAB. 0.0.0 .0.0 

200 REfl TING 

201 PATASTEN.FN STOR STFN .LARU IKI T MED L 
APPAPORlSf RE.NDC FELDSPAT , 1 

202 PATAPYRAfllPE.FN LILLE PYRAfllPE AF GL 
AS .PEN SER (1YSTISK UP.0 

203 OATAN0GLE.FN NBGLE.DEN AABNER P0RE.2 
Z 

204 PATAFIRPBAANO . F I PYST I SK ARdBAANP.PET 
S KDPENUnnER ER ' ABQCXF ' „ 1 1 

205 PATAD1AP1ANT .FN FUNKLENPE OIAF1ANT, EN 
(1EGET UflFRDIFULP DIAP1ANT.16 

286 PATABRAFT.FT BRAET AF FYRRETRAE .PET 
FR 25 CH BREPT DG 3 H LANGT.1B 
207 DATAPISTOL , EN UNPERLfG PISTOL .DET ER 
FN ENGANGSLAZERFISTQL.17 

288 DATADYKKERUOSTYR.ET DYKKERUD5TYR .DET 
ER TIP-TOP I0RDEN.64 

289 DATAKEGLF ,EM KEGLE AF GLAS.DEN ER AF 
SflHflE HATER I ALE 5011 PYRflfllDEN . 33 

210 PATA COL f. FN COLT. FN GOD GAtfPIELPAGS 
PISTOL PER UIRKELIG KAN SKYDE .33 

211 DATAKASSE , FH KASSE.EN KASSE OER KAN 
SKE AT UAERE NYTTIG ,31 

212 DATASKAT.FN SKAT .EN KISTE PER INDEHO 
LUER EN COnnODORE 64.68 

199 REfl *"START*« 



500 PRINT -rCLRK2CNH 2SPCIDU HF»R FUNDET 
FN HYSTISK D0R IND I EN KUPPESIPE. PEN 
ER LflUET "J 

501 PRINT "flF EN HIDTI L[ 3SPCJUKENDT CIUIL 
T SAT I ON . NYSGERRJG, SDN pU[2SPC]ER, FBPR 

□U 

532 PRINT LYST TIL AT UNDERSBQE DET ... 

1000 ONRUGOSUB5000 .50 10 .5020 .5030 . 50-10 ,5 
050 ,5060 ,5070 .5070 ,5078 ,5100 ,51 10,5120 

1001 IFRU<14THEN1 L00 

1002 IPRU=21THENGOTD5230 

1003 Rl-RU-13 

1004 ONR1GOSUB5130.5140.515B.515B.515B.5 
1 80 ,5190 ,5208 .5210 .5720 . 5230 ,5240 . 5250 

1005 iFRU<26THE:Nl 100 

1006 Rl=RU-26 

100? IFRU=29THENGOTO5290 

1008 IFRUO3THENGOTO5330 

1 009 DNR I GD5U05250 . 5Z50 . 5290 , 5300 .5310.5 
320 . 5330 . 5340 . 5350 . 5360 . 537B . 5380 .5330 

1010 IFRU=40THT£NGOTO5400 

101 1 IFRU<33THEN1 100 

1012 Ri=RU-39 

1013 IFRU=41THENGOTO5410 

1014 IFRU=44THENGOTD5440 

1015 IFRU=45THENGOTO5450 

1016 ONRlGOSUB5400.54rl0.5420.5430.54^0,5 
458 .5460 .5470 .5480 ,5158 . 5500 .5510 .5520 

1017 IFRU -63THENGDTO5630 

1018 IFRU<52THEN1108 
1028 Rl=RU-52 

1025 QNR1GPSUB5530 ,5540 , 5550 ,5560 ,5570 , 5 
580,5590.5600.5610,5620.5632.5648.5658 
1050 IFRU=66THENGDTO208B0 
1 180 PRINT "OU KflN SE : 

1110 K1=0:FORX=1TO12; IFRU=T (X JTHEhPRINTT 
Z4tX3:Kl =1 

11U NEXr:IFKl=0THENPRINT IKKE NDGET SPE 
RL IGT , ' 

1201 IN** " '- PR INT" > 

1218 GETA4: IFfl*= "THEN1210 

1211 lFfli= "THENlNi=INi+ :GOT01235 

1212 IFfl*= 0 THENlN*=IN*t 8" : GOT01235 

1220 IFfH-CHR4(20 )HNDLENC IN* )>0THENIN4=L 
EFTiC IN* .LENf INS ]-l ): G0T01235 

1221 IFfH=CHRi(13 3THENI258 

1225 IFfli - T HOfll "THENIN* = ' " :G0T01235 
1227 IFflSCrni)<65ORflSCCfti)>90THEN1210 
J23B lN*=IN4tfl4 

1235 PRINT rCOK37SPC] : PRINT tC0J>"TN4' 
* :GOT0121B 

1250 IFIN4= THENPRINT WUA ' Bfl . :GOT0l28i 
1299 X=l 

1380 IFX-LENC I Ni )THEN1350 

1305 lFniP*CIN*.X,l )= ' THENI24=RIGHT*(l 

N4 .LENC INi )-X >U 1 4 =LEFT*( IN4 .X-l J: GOTD13 

55 

1310 X=Xtl:GOTOI30B 
1350 I14=IN4 

1355 IF I 1*= NORO riNDNCRU )<>0THENRU=NCRU> 
i GOTD1B80 

1357 IF I 1 * = SYD ANDSC RU J <>BTHENRU=S CRU )i 
GOTO I B00 

1359 IFI14= UEST «NDU(RUX>0THENRU=UCRU) 
:GDTD1000 

1361 IFI 14 = BST ANDE C RU J < >0 THENRU =E ( RU ) : 
GOTO 1000 

1363 IF I 14= OP ANDUtRUK>8THENRU=UCRU}:G 
OTOI0BB 

1365 IF I 11= NED ANDD t RU ) < >0 THENRU =D ( RU ) : 
GOTO1000 

1366 Kl=8 

136? Jf lti- OP QRI 14 = SYD 0RI15- NORU OR 
M*= NrfJ'ORll*= UEST OR I 14= BST THENK1 = 1 
1370 IFKIM THENFRINT DU KPN IKKE GAP I 0 
EM RETNING ClGE NCR. :GOTO1201 
1375 IFI 1 * - SE THENGOT01 008 
1500 IFI14<>"TfiG THEN1550 



1581 IFI 24= STEN ANOTC1 J = 1 ANDRU = 1 THENPR I 
NT""OEN ER FOR TUNG . " I GOTO1201 

1582 JFRU=7flN0I24= 'COnPUTER THENPRINT 'HU 
ORFOR PET ft. DU HAR JO ALLEREDE EN . 1 : GO 
TO120J 

1545 KI=B:FORJ( = 1T012: I FT C X 3 =RUBNP 1 24 =T 1 4 
CX 3THENPRINT OK.' : TCX J=333:K1=1 

1546 NEXT: IFK1=1THEN1201 

15<I3 PRINT DEN KftN DU IKKE TftGE- :G0T01Z 
81 

1550 IFI14<>' SKUB THEN1600 

1551 IFI24= STEN ANDRU=TCl 3THENPRINT STE 
NEN TRILLER UflEK . " : TC 1) = B: T (Z 3 - 1 : GOTDT20 
1 

1599 PRINT^OEN KAN DU IKKE SKUBBE TIL. : 
GOT012B1 

1600 IFI 14<> EJENDELE THEN1610 

1681 F0RX=1T012: IFTC?0=999THENPRINTT24tX 
) 

1602 NEXT:G0T0128I 

1610 IFM40 UNDERS0G THEN1630 

1611 K1=B:FORX = 1T012: I F I 24 = T 1 4 ( X DPNDC T (X 
t =RUOR T C X ) = 999 VTHENPR I N T T34 C X 3 : K 1 = 1 

1612 NEXT: IFKl =1THEN12B1 

1614 1FRU:3ANOI24=R0O THENPRINT OER ER 
ET PYRpniDEFORJIET HUL I D0REN . 1 GOTOl 28 L 

1616 IFRU=7AND 1 24 ^ COMPUTER 'THENPR INT "OU 
KflN TRYKKE EN BESKED IND 1 GO TO 1281 

1617 IFRU*4 9AND12'4-"0BR' THENPRINT DER ET 
KEGLEFDRP1ETHUL HER. * GOTOl 20 1 

1618 I FRU =4 2ANDSK =8AIND 1 24 ="SKADE" T HENPR I 
NT "DEN KflN L IDE GLIP1TENDE Tl NG GOTOl 20 
I 

1619 IFRU=61ANDI24= KNAP THENPRINT T RYK 
PflA DEN , OG DIN FLUGTUEJ ER SIKRET I I GO 
TO1201 

1628 IFK 1 =0THENPR INT JCG SER IKKE NOGET 
^PECIELT" 

1629 G0T012B1 

1630 IFI14='ST0P"THEMNPUT SIKKER iY4:I 
FLEFT4CY4.1 ) = "J-THENPRINT ( CLR] : END 

1631 IF 1 1 * = STOP'GOTOtZOl 

1632 IFI14<> SHID"THEN1678 

1635 K1=0: IFRU=Z0flNDT(6]=933flNDIZ4= QRpE 
T THENNC28}=2l:9t21 ) = 20: T ( 6 ) =0: K 1 =1 

1636 IFK1 M THENPRINT BR6ETTET LIGGER SIG 
OUER FLODEN. DET ER UHULIGT F*T TflGE IGE 

N . 

1637 IFK1 -ITHEN1201 

1638 K1=0: IFRU=42flNDTC53:999flNDI24= Dim 
ANT THENK1 = 1 : T C 5 } =8: SK = i. : S( 42 ] =4 1 

1639 IFKl-1 THENPR INT 5KADEN TftGER DIf=»nftN 
TEN OG FLYUER UflEK . ^G0T012B1 

1660 K1=0:FORX = 1TO12: IFTfX )=999flNDI24-TI 
4[X)THENTrX)-RU:PRlNT GJORT. =K1=1 
1662 NEXT: TFK1 =1 THEN 1201 

1669 PRINT HUflD SKAL JEG SHIDE ? --G0TD12 
01 

1670 IFJ140TRYK 'THENl^BB 

1671 K1-8:EFI24t KNFiP , '' : INDRU=2THENPRIHT □ 
8REN AflBNER SIG OG UU BCSLU TTER DIG AT'' 
Kl=l 

1672 IFM=1THENPRINT AT GAB DERIND. LIGE 
I DET DU ER INDENFOR 

1673 IFK1=1THENPRINT FflLDER DU I EN SKAK 
T . RU=3: GOTOIB80 

16?5 Kl =0: IFRU=?rtNDI24=-ABQCXF THENPRINT 
EN COnPUTERSFEPiriE SIGER ! 'Kl=l 

1676 IFKl = I THENPR INT ' ABOCXF ER INDREGI ST 
RERET . " • CO -1 i GOTOl 281 

1677 IFRU=?ANDI24<> ABOCXF T HENPRINT ING 
EN REAKTION. BBU ' : GOTOl 281 

1678 IF I?* : "KNAP ANDRU=61 THFNNC46 ]=65: PR 
INT GAA NORD UEO TOPPEN AF TRPFPEN. : GOT 
01201 

1680 IFRU:31ANDI24- KNAP THCNRU -32: GOTO 1 
000 

1681 1FRU = 32ANDI24^ KNPP THENRU =31 : GOTO 1 
000 
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1699 PRINT' HUAD UIL DO TRYKKE PRA ? ' t GOT 
□ 1201 

1700 I FI i *<> AABENTHENI750 

1702 IFRU=3ANDI2*= -BLRA"ANDU(3)=0THENPRI 
NT OKRY. " i Ut 3 Mi E( 4 J=3i GOTO1Z0I 

1703 IFRU=3ANDI2*= BLRA ANQU(3 ]=4THENPRI 
NT ER AABNET ??"'; GOT012B1 

1705 IFRU=3ANDI2*= GR0N ANDS(3)=BTHENPRI 
NT OKAY. :Sf33-6:NC6]=3:GOTOl201 
17B6 IFRU=3ANDI21= GRBN ANDS(3 3-6THENPRI 
NT "ER AABNET ??:GOT01281 

1708 I FRU -3AND I 2i e R0D' ANDEC3 J-0THENPRIN 

T'OER ER INTET HAANPTRG : GDTO1201 

1711 I FRU =2AN0 1 2t = D0R " THENPR I NT KRN DU 

IKKE.":GOTO1201 

1715 IFRU=36f»NDU(36D=0flNPTC3 .1 =999ANP 1 2* = 
O0R THENPRINT OKAY . ~ : UC36 )=35: GOTO 1201 
1719 PRINT HUAD UIL DU AABNE ? :GOTO1201 

1750 IFIliO TASTG0R THEN 1770 

1751 Kl =0: IFRU=3ANDT C 2 J=999AN0 1 2* = PYRAP 
IDE TRENT C2 )=0:E(3 3=5: UC5 )=3:K1=1 

1752 IFKl =1THENPRINT PYRAniOEN SIDPER NU 
FOR EUIGT FAST FOR* = 1 T01 000: NEXT 

1753 IFK1 =1 THENPRINT D0REN AABNER SIG,": 
GOTO 1201 

1751 Kl=0: IFRU^9flNDTC9)^999ANDI2i= KEGL 
E ANDSC49 ) -BTHENM = l:Sf433-52:TC93=0 

1755 IFKl=lTHENPRIMT*KEGLEN SIDOER FAST 
OG UE JEN HDD SYD ERC 2SPC ]AABEN . :GOTO120 
1 

1756 Kl =0: IFRU = 65ANDI2*: "KASSF ANPT(11)= 

933THENTC 1 1 )-0; N(65 1*66; K 1*1 

1757 IFK1=1THENPRINT-DER ER NU UOGRNG MO 
D WORD. HAU HELLEREI 2SPC 1SKATTEN dEP : GO 
TD1201 

1763 FRINT'DER ER IKKE NOGET AT FASTG0RE 
.":GOTD120l 

1770 IFIt*O''SU0n"ANDIliO"PYK~THEm800 

1772 K1=0: tFRU=20ANPT(8)=999THENKl=l:PRJ 
NT DU SUBrWER GLAD RUNPT PAA BUNDEN AF' 

1773 IFKl =1THENPRINT"FL0DEN. :FORX=1TO40 
00J NEXT: PRINT "AAAARGH - DIN SLANGE BLEU 

1774 FRINT"'SKAARET OUER RF BUND ENS SKRRP 
E KLIPPER. PU ER PBD. : FORX-1 TO40BB: NEXT 

1775 IFKl=ITHFNGOTO10000 

1779 Kl =0: IFRU=20THENPRINT "STRBnnEN ER F 

OR STAERK. DU BLlUER TRUK-" 

1779 IFKl =1THENPRINT KET NEP. JDEN DYKKE 

RPRAGT DRUKNER DU . DU ER D0P" 

1 7B0 I FK 1=1 THFNFORX - 1 TO40BB: NEXT I GOTO 1 00 

00 

17*99 PRINT'OU KAN IKKE K0HP1E TIL AT SU0pl 

me her. pr0u noget andet . ' goto 1 20 1 

1800 IKI1*O"lIST"THENI850 

1801 PRINT "NORD .SYD .0ST .OEST .OP .NED . 

1802 PRINT* SE ,E JFNDELE .SU0p1.DYK .STOP , 

1806 PRINT FBlGENPE. KRAEUER PE50DEN NRUN 
EORP ; " 

1807 FRINT TflG.SHID.FRSTG0R.TRYK.SKUB.UN 

DERS0G." 

1808 PRINT 'AABEN.LRES .SKYP. 
1819 GOTO1201 

18!58 IFIliO"SKYD"THrNl900 

1851 Kl =0: IF I2i GflFFY ANORU*35ANUGA=0AN 
DTt 10 J=999THENGfl-l !NX35)ar34! Klfll 

1852 IFKl =1THENPRINT DU SKYDER GAFFYEN . 
□EN FORSUINDER . "'! GOTO 1 20 1 

1853 Kl=B: IF T T 7 I =999THENPRINT P I STOLEN E 
KSPLODERER I HOUEDET PAA DIG . : Kl = l 
1851 IFKl =1THENFORX=1T14000:NEXT:GOTP100 
00 

1890 PRINT'UET EK FORL I GT AT SKYDE PRR A 
lT PIULIGT. SAA LAD HELL ERE URERE . ~ i Gl 1 20 
1 

1900 IFRUO&nNPIli^LflFS"THTNPRlNT-PI£TP 
lEN ER FARLIG. SHID DEN NELL ERE - " : GOTO 12 
01 

480B R= fNTCRNDt 1 3*5 1 



1910 !Ffl=0THENPRlNT"B0U HAND Mil 

4815 I FA = 1 THENPRINT"' JEG FORSTAAR IKKE I" 

4820 I FA =2THENPR INT"SLUODER I" 

4825 IFA=3THENPRINT"'DET SPROG FORSTAAR J 
EG IKKE." 

4830 IFA-1THENPRINT'*0H. 
4935 I FA =5THENPR INT"UR0UL I ? ' 
1950 GOTO 1201 

4999 REN*** STEDERNE 

5000 PR I NT " C 2SPC ] DU STAAR PRA EN KLIPPE 
AFSATS . SERt 4SPC3GAAR EN STI NED." 
50B1 RETURN 

5010 PRINT T 2SPC1DU STAAR UEP PEN flYSTIS 
KE P0R. DER' 

5811 PRINT GAAR EN STI OPAD BJERGET. PAA 

D0REN ERC 2SPCJDER EN R0D KNAP." 
50 12 RETURN 

5020 PRINT T2SPC3DU STflAR I EN FORHAL IN 
"E I BJERGET." 

5021 PRINT "HOD UEST ER PER BLRR DBR . HOP 
SYP ENC4SPCJGR0N OG HOD 0ST EN RBD DBR. 

5B22 RETURN 

5030 PRINT"DU BEFINDER DIG 1 UESTKORRIDO 
REN. 110DC 3SPCD0ST ER PER EN BLAfl DBR . * 

5031 RETURN 

5040 PRINT"DU BEFINPER DIG I 0STKORRIDOR 
EN. flODMSPCJUEST ER DER EN RBD DBR . " 

5041 RETURN 

5050 PRINT'OU BEFINDER DIG I 5YPKORRIO0R 
EN. MODE 1SPC1NORD ER DER EN GRBN D0R." 
5851 RETURN 

5060 PRINT"DU ER I ET LILLE RUfl . HUORI D 
ER STAAR ENCOdPUTER . UDGRNG : SYD." 

5061 RETURN 

5070 PRINT'OU STARR I EN NORP-SYP KORRJP 
OR. PU KRN GAA NORD.SYP OG ???" 
5B71 RETURN 

5100 PRINT DU ER I ET LILLE LRGERRUH . HE 
R LIGGER ENBUNKE TING. UO ER UEST.' 

5101 RETURN 

5110 PRINT' DU STARR PAA EN ELEUATORPLATF 
ORfl. 

5111 PRINT ELEUATOREN KAN KUN K0RE NEDAD 
flOD UEST ER DER EN HULE . 

51 12 RETURN 

5120 PRINr'ELEUATORPLATFORpl. HERFRA KAN 
DU K0RE OP" 

5121 PRINT'-OG NED PtED ELEUATOREN . EN 0ST 
-UESTt BSPOKORRID^R I PIBER I RNGS ELEUflTOR 
EN." 

5122 RETURN 

5130 PRINT" I BUND EN AF FLEURTORSKRKTEN . 
HER ER T1L-SYNELADENDE INGEN UDGANGE . 
5133 RETURN 

5140 PRINT"ET HEPPELI GT RUfl. DER ER UDGA 
NGE TILC-»SPC]RLLE FIRE UERDENSHJ0RNER . 
5111 RETURN 

5150 PRINT'ET RFSI DESLIGGENDE RUfl. ' RETU 
RN 

5188 PRINT"EN STOR BJ ERGHULE ARBNER SIG 
FQRAN DIG." 

5181 PRINT"LAENGFRE FREriplE KAN DU H0RE E 
N FLOD." 

5182 PR I NT "HULF.N LIGGER I 0ST-UESTLIGT R 
ETNING. 

5183 RETURN 

5130 PRINT "DU STARR UFD EN UNPERJORDISK 
FLOD DERC 3SPC1L0BER PAA EN KLIPPEGRUNP. " 

5131 I FT f 6 ] -0THENPRINT ET BRAET F0RER OU 
ER FLOPEN" 

5192 RETURN 

5200 PRINT"DU STARR PAA DEN ANDEN SIPE A 
F FLODEN .T 2SPCJEN UDGANG ER HOD UEST . " 

5201 RETURN 

5210 PRINT-OU BEFINDER DIG I EN LILLE .10 
RK OG AF-[ 2SPC3SJ DESL IGGENDE BJERGHULE." 

5211 RETURN 

5220 PR I NT "KORR JDOREN SU INGER ET PAR GAN 
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GE . T BSPC 3UDGANGE i BST .UEST OG SYD . 
52 21 RETURN 

5230 PRINT DU FALDT I fT DYBT HUL. DU ER 
D0D . -FORX=lTOq0a0: NEXT: GO TO 10000 

5240 PRINT EN PASSAGE . DU KPN KOnriE SYD 
OG 0ST . * RETURN 

5250 PRINT '0ST-UEST KORR1DOR. ER HER HON 
^NDREE 5SPC 3UDGANGE ?" 

5251 RETURN 

5290 PRINT DU ER NU GAAET IGENNEH EN t RE 

uirodcoff) D0R noo 

5231 PRINT T Rr."J10STr OFF] . SP-ft HER STAAR 
FN RUSSER. 

5292 IFTCS3=993THENPRIN1 OA HAN SER DIN 
DIAHANT SIGER HAN 'Sfifl- 

5293 !FTf5 )-*993THENPR INT ' OAN ET KAPITALI 
STSUIN'. OG SLAAR DIGt 4SPCHMJEL' 

52 94 IFTT 5 )=999THENF0R>U1 TO8000: NEXT: GOT 
010000 

5295 PRINT HfiN SIGER 'DA SUIDANIA*. I GOT 
01 100 

5300 PRINT DU STAAR I FN UBAADSHfiUN HEO 
RUSS1SKE 

5301 PRINT UBAAOE. nOD 0ST ER PER EN C1JN 
IUBAAP 

5302 PRINT Pfifi UfiEGGCN HAENGER DER FN SE 
□DEL. 

5309 RETURN 

5310 PRINT DU ER I FN NINIUBAAD. Pfifi PfiN 
ELET ER DERKUN EN KNfiP . UOGANG HOD UEST . 

5311 RETURN 

5320 PRINT UBAflDEN SE IlER. . . 

5321 PRINT DU KAN SE EN KNfiP . 

5322 PRINT OER CR EN UOGANG HOD NORD. CD 
CTTE ER FN STOR HINIUBAAD.l 

5323 RETURN 

5330 PRINT SlUSEN UD TIL OHGIUELSERNE . 

5331 K1=0: IFrr9)0999THENPRINT OER STRBM 
ICR UAND IND I KABINEN. UDEN 'Kl=l 

5332 IFK1 =1THFNPR1 NT OYKK6RDRAGTEN DRUKN 
FR OU. :FORX=1TO4B00:NEXT:GOTOL0000 

5333 PRINT UDGfilNG HOD SYD. : GOTO 11 00 
5340 PRINT DETTE ER GfiFFYENS EGEN MULE . 
HOD SYD ER DER EN K0RRI0OR RETURN 

5350 PRINT'UETTE ER ET LlLLE RUM." 

5351 PRINT'DER EN UDGANG HOD 0ST , " 

5352 IFGn-lTHrN5357 

5353 PRINT DER EN GAFFY HER . * RETURN 
5357 PRINT GfiFFYENS HULF CR HOD NORD. 

5359 RETURN 

5360 PRINT DU STAAR I FN 0ST-UFST KDRRID 
OR. UEJENr2SPCJHOD UEST ER SPfiFRRET AF 

5361 PRINT 'EN D0R. . RETURN 

5370 PRIHfEN BJERGHUuE. UDGANGE BST OG 
UEST.":RETURN 

53B0 PRINT' DU STfiAR I COI1PUTERRUHPIET . 
53B1 PRINT DU BLIUCR NU TESTrT fiF COHPUT 
ERFN. 

5382 IF T f 4 ) <>999Ti ffNPRINT DU MAR INTET R 
EGI STRERING^fiRflBAAND -Sf38 ]^0: RETURN 
53B3 IF T f 4 1 -399ANDCO--0THENPRINT 01 T ARHB 
AAND ER IKKF BLEUFT REGISTRfRET. -RETURN 
5384 PRIKT "Oil ARflBAAND ER REGI STRERET . 
•S13B ^33,-RETURN 

5390 PRINT*"KURRIUUR. ANDRE KORR IDCJRFR F0 
RER NORD ,1 2SPC3B5T OG UEST. • RETURN 
5180 PRINT 'OU ER I FT UAGTRUI1. 

5101 IFRND(0H0.08THENRU-45:PR]NT DU ER 
FANGET AF EN UAGT . 'GUroi000 

5102 FR I NT "'UOGANG HOD BST. -'&OTO1100 

5110 PRINf'DU ER I ET RUH MUOR DER TIT E 
R HANGCC 4SPC JUAGTER . PAS DERFOR PAA M 

5111 1FRNDCB KB .05THFNRU ~49 : PRINT EN UfiG 
T FIK FAT PAA DIG. :GOTO108B 

5112 PRI NT "UDGANGE MOD NDRU . 0ST OG UEST 
"" : GOTO! 100 

5120 PRINT DU STARR UED EN SKAUEREDF . 



5421 IFSK-0THENPRINT "SKADEN I REDEN UIL 
IKKE LADE DIG KOHriEC 2SPC JFORBI . RETURN 

5422 PRINT'DER CR EN UDGHNG HOD SYD OG U 
EST."? RETURN 

5430 PRIN["UU STAAR I EN LILLE NICHE. UD 
E PAA " 

5131 PRINT "&ANGEN GAAR DER TO UAGTER FOR 
BI . OE '• 

5432 PRINTT1UHLFR NOGE T OH AT COHPUTEREN 
MAR IND-'' 

5433 PRINf'REG I STRERET FN UUEDKOHHENDE I 
NDTRAENGER." 

5134 PR I NT "T C010G HUIS HAN DUUER FANGET 
S Afi ENDFR" 

5435 PRI NT "HAN I FAENGSLET . 

5436 PRINT'Ofi UAGTERNE ER GAAET ER DER F 
RI BANE MODS YD. ' RETURN 

5440 PRIN f'HER KOffflER DER TIT UA6TER Sfifl 
PAS MFGET PAA • t ! " 

5441 IFRNDf a 1<0 . 1 TMENPRINT OU ER FANGET 
AF SAADfiN EN. : RU-43; GOTO10B0 

5442 PRINT OCR UDGANGE MOD BST OG UEST. 
:GOTO110B 

5450 PRINT FN AFSIDESLIGGENDE PASSAGE, M 
UOR DER KUNAF OG TIL KONHER UAGTER. 

5451 IFRNDC0K.02THENPRINT UHFLDIGUIS ER 
HER EN L1GENU. OU ERC 6SPC JFANGET . :RU=4 

9: GOTO180 

5452 PRINT"UDGANGE HOD BST OG UEST . " ' GOT 
01 100 

S4G0 PRINT"OU STAAR PAA TOPPEN AF EN TRA 
PPE. "RETURN 
5470 REH 

54B8 PRINT-OU STAAR HIDT PAA FN TRnPPE . " 
: RE TURN 

5490 PRINT' DU CR I ET FfiFNGSCL . MOD SYD 

CR PER CNt2S-PC]D0R. : RETURN 

5500 REH 

5510 REH 

5520 RCH 

5530 KEH 

5548 REH 

5550 REH 

5560 PRINPDU ER I EN KORRIOOR. UDGANGE 
TIL ALLET 3SPCIFIRE UERDENSHJ0RNER.": RETU 
RN 

557B PRINT'DU STAAR NEDENFOR EN STOR TRA 
PPE. riOOf 3SPCJ0ST ER DER EN ALLE. 
5571 RETURN 
5538 REN 

5590 PRINT'DU STAAR PAA EN 8ST-UEST GP-AE 
NDE ALLE." 

5591 PRINT'TIED UMYGGClIGE TRArR PAA BEGG 
F SIDER.f 3SPCIH0D BST LIGGER ET SLOT. " 

5592 RETURN 

5600 PRINT-SKATTCKAHHERET. f JUHUU ) " 

5601 RETURN 

5610 PRlNrET AFSIDESLIGGENDE RUH. UDGAN 
G HOD UEST." 

5611 PRINT HER EN KNAP. ' RETURN 

5620 PRINT "DU ER PAA SLOTTET . HOD SYD ER 
DER ET • 

5621 PRINT UAGTRUH. ANDRE UDGANGE ER NOR 
0 OG BST. "RETURN 

5630 PRINT'DU FR UADET LTGC IND i_0UENS G 
AD . DFTTF 

5631 PRINT 'RUM FrR FYLOT MED UAGTER SOH 0 
JEBLIKKC- 

5632 PRINT'SlAAR DIG IHJEL . " : FORX= 1 TO408 
0: NEXT: GOT01 0800 

5640 PRINT'DU FR I EN AFSIDESLIGGENDE MU 
LE . UDGANG MOD 0ST . " * RETURN 

5650 PRINT DU FR I EN HCflfirLIG NICHE. P 
fifi UAEGEN FRDER ET KfiSSFFORdET HUL." 

5651 RETURN 

9500 PRINT "f ClR ] TAB(13) [ CHI INSTRUKT ION 
ER 

9502 PRINT ' I DETTE EUENTYRSPIL SKAL DU 
GAA RUNDT" 

9504 PRINT'OG UDFORSKE ET STORT UNPERJOR 
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3512 PRINT " 1 NORD ' FOR AT GAFt NORD. DU K 
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I J 1 


i ip 
1 


1 T 7 


1 O 1 

1 a 1 
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957fi PRINT' AF FT NOIINFfiffn F FlfC 1 TAH CT 
i Jtu r i\ j n i nr c I Finur»t Ur\U . r . t F.a 1 rib I 


201 


76 


202 


14 


203 


1 49 


FN ' 
l n 


204 


3 


205 


66 


206 


232 
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5121 


53 


5133 


142 


5150 


222 


5182 


151 


5l3l 


166 


5201 


142 


5220 


52 


5243 


1 93 


5290 


184 


5293 


164 




217 






5320 


60 


S323 


142 


5332 


45 


5350 


151 


5353 


297 


5360 


166 


5380 


17 


5383 


226 


5400 


195 


5410 


1 90 


5420 


153 


5430 


132 


5433 


5 



5134 


145 


5140 


156 


5150 


206 


5160 


53 


5490 


83 


5520 


113 


5550 


113 


557 1 


11? 


5591 


230 


5601 


112 


5620 


55 


5631 


215 


5650 


52 


9502 


25 1 


9508 


1 37 


9512 


119 


9520 


97 


9525 


46 


9528 


232 


9532 


135 


9550 


55 


9556 


197 


3562 


77 


9919 


142 


10002 


192 


28000 


112 


20020 


203 


21010 


113 



5135 


4 


5141 


134 


5151 


100 


5170 


143 


5500 


113 


5530 


113 


5568 


17 


5580 


1 13 


5"532 


112 


56 10 


124 


5621 


131 


5632 


204 


5651 


142 


9504 


215 


9510 


85 


9513 


100 


9523 


121 


9526 


47 


9530 


129 


9533 


235 


955 \ 


139 


9559 


31 


9839 


55 


18006 


25 


10003 


97 


20001 


138 


20030 


81 



5436 


230 


5442 


143 


5452 


154 


5180 


230 


5510 


143 


5540 


113 


5570 


223 


5590 


1 39 


5600 


79 


561 1 


1 75 


5630 


l 31 


5640 


230 


3500 


216 


9506 


255 


3511 


94 


9518 


1 74 


3524 


I 


9527 


182 


9531 


134 


9534 


62 


9555 


134 


9560 


224 


3900 


137 


10001 


208 


10004 


1 13 


20010 


0 


21000 


212 




SUPER SPRITE 

INSENOT af 
ANDERS SUCH 
ROLIGHEDSUEJ 28 
7730 HUIDBJERG 



TIL COMMODORE 64 



10 REn XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

11 REn * % 

12 REH X SUPER-SPRITE X 

13 RErt * * 

14 REH * x 

15 REM * CCD 1985 AF AB-50FTUARE x 

16 REF1 x x 

17 REn xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

21 : 

22 : 

23 REn xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx*x 
21 REn * START x 
25 REn xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

30 X=l:Y=l:FC03=2:FCl 3=1 : FC2 3=0' FC3 3=14 
50 K0=53248: POKEKD+21 ,7: POKEKOi-28 ,5 
60 POKEKOi-23,4: P0KEK0+23 , 0: POKEKO* 1 6 ,2 
70 POKEKO+3? , 2: PDKEKO+38 , 1 : FOKEKO-r 33 ,0: P 
OKEKO*40 ,0: POKEKOtll ,6 

80 POKE2040 ,13: PDKE204 1 , 1 3: FOKE2012 , \ 4, 
90 FORL =836T0958 1 REAQL 1 : POKEL .LI : NEXT 
100 PCHEK0.225: POKEKOM ,55: P0K£KOt2 ,33: P 
OKEKD+3 ,55: P0KEK0*4 ,60: POKEKO+5 ,206 
105 FORL-03ZTQ994: PQKEL. 0:NEKT 
110: 

120 REH SPRITE DflTfl 

121 OfiXfl 0.0.0.0.0.0.0.0.0,0.0,0,0 

122 PflTfl 0,0,0,0,0,0,0,0,0,0,0,0,168 

123 DATA 0.10.168.0.12.168.0,12.2,170,16 
8. 2,168 

121 DATA 168.2,160.168,0.0,160.1,80,168, 
1 ,84 ,42 

125 DflTA 1,85,42,168.0,10.168.0.0.168.0 
190 Rtn xxxxxxxxxxxjtxxxx 
200 PRINT f CLR3 "CHR*(8 3CHR* t 142 3* 1 PDKE53 
280,3;POKE53281 .11 



21 0 PRINT T BLKH 2SPC3SUPER-SPRI TE KONTRO 

LC 2SPCJ[CYN3CC/PK 7SPCH C/P J 

220 PRINT T24SPC3C CYN3CCxP3t 7SPC3C C/FJ 

238 PRINT TBLKHREY] ICOFFl/t REW32C OFF J/t 

REUJ3COFF3: fiFSET FflRUE 1/2/3C CYN3 C C/P3C 

7SPC3CC/F] 

240 PRINT r 24SPCJ[ CYN3E Cyf][ 7SPC3C C/P J 
250 PRINT rBLK]CREVJ34COFF3: SLETC 17SPCH 
CYN3EC/PDC7SPC3CC/P3 

Z60 PRINT ' C 245PC3CCYN][C/P][7SPC][C/fJ 
270 PRINT t BLK3E REU3CLR/H0f1E[ OFF) : NY SP 
RITEC 5SPC][CYN]CS/L3t7C/P3[SA3C7C/P3 ' : 
280 PRINT' T24SPC3C CYN3CCXP3 
230 PRINT T BUCK REU3CRSRC OFFJ D7NAVH: C 
URSOR QP/CCYN3C C/P K BLK 3CURS0R-X: T 25PC3C 

UMTJ01 

3B0 PR I NT T BLK K 14SPC3NED. . . t 4SPC 3 C CYh3t 
C/P] 

310 PRINT T24SPC3C CYN 3C Z/? ]C BLK3CURS0R-Y 
:[ 2SPC][UHr3Bl 

320 PRINT' f BLK It REU3C TRLC 0FF3 1-C18SPCJCC 

VN3CS/L3I 15C/P) | 

330 PRINT C 24SPC3C CYN3E C/PJ 

310 PRlNTTBLKjCR£u3ltOFF3/CREU32[oFFJ/t 

REU33COFF3: CNDRE FARUE 1/2/3C CYN3I C/P3C 

BLKjFflRUE: It 2SPC32C 2SPC 33 

350 PRINT r 24SFC3C CYN3C C/F3C 6SPC3I REOJCR 

ED3B2[ CH 3 [UHT 30 1 CCH3C BLK 300 

360 PRINT f REO]E BLK34C DFF3/CREU35C OFF]: 

UPUIGELSE flF XXY-C 2SPC3C CYNJCSXL3C 15C/P3 

370 PRINT TBLKH5SPC3flKSEC I5SPC3C CYN3 E C/ 
PJ 

380 PRINT r24SPC3CCYN3[C/P3CBLK][3SPC](C 
3 1 985 

338 PRINTTBLK3EREU36[DFF3: DflTflL I NIER I 
NDLCSESC 2SPC3tCYNJ[C^P] 

400 PRINT f 21SPC3C CYNJCCXP3CBLK) A0-SOFT 
UF*RE 

410 PRINT "f BLK3HUSK DET } . . .OG TRYK C REU 
3FUOFF3 C CYNJt C/F3 
420 PRINT TCYNJf 40C/Y3 

430 PRINT CBLUKREU3C 4C/Y3C 17CH][ lSC/O^" 

410 PRINT f REDKREU3C 1C/Y][0FF3tBLU][ ISP 
CJCOnnODORE 64 CRED3C REU3E 13C/Y3EHOH3 " 
«50 GETft*; IFflSO TF13 THEN150 



40 



460 F=54272i TB-0 

170 PR INT T HOfl] - : I FORL =1 TOZ1 : PRI NT' r QR3J 
rREU3C21SPCH 16CH3' ::NEXT 

500 REM XXXXXXXXXXXXXXXXXXXXXXXXX xxxxxx 

501 REM * (CONTROL * 

502 REH x xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

510 L:(X-l)X2t(r-l Wtl02<} 

520 FDKEL ,96-64*SGNCPEEKCL3-l28 3:POKEL*i 

,36-64 *SGrU PEEK CL+1 3-128 3 

530 GETK* 

540 IFK*: TBLK] '0R(C* = "rUMr3 DRKi^ I RED] 
THENGOSU0I000 

550 IFK*= TCNJ "THENGO5UB1200 

560 IFK*= TC03 THENGOSUB 1 300 

570 IFK*= f GU3 THENGOSUB14B0 

580 IFK»: TTHJ THFNGOSUB1500 

530 IFUflLf.K* ]>BRNPUAL(K*3<4THENGO£UB17fl0 

608 IFKi = THEN510 

610 IFflSCfKi )>32FINDflSCCKi3<3BTHENK*=CHR» 

ff!SCC»Ci)+16 3:G05JBl 700 

620 IFKI? 4 ORK* = 4 THENGOSUB 1 850 

630 IFK*= rCLRJ"THENGO5UB1300 

640 IFK4- rCYN3"ORKi* f PUR] THENGQSUB200 

0 

650 IFK* = [ GRN ] ' THENGQTO2100 

999 GOTO510 

1000 REM xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

1001 REM * SKI FT FflRUE x 

1002 REM xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
1810 I FK* = T BLK J THENK*=CHR*C1 ) 

1020 NR=SGN(flSCCKS 3-5 3 + 1 i L2-FCNR 3 
1830 GOSUB1 IBB 

1 040 I FF C NR 3 =F t NR-t ifiND3 30RF C NR 3 =F ( NRT2PN 

D3 30RFCNR 3 =F CNR*3flN03 3THEN1830 

1058 FORL =0TO22STEP2: FORL 1 = 1024TO 1824STE 

P^0 

1060 iFCFEEKCLtLl+F 3AND15 ) =L2THENPDKEL * L 
I'F.FC W)iPOKEL+LlfF+l .FCNR3 
1065 NEXT: NEXT 

10?0 POKEK0T37*NR,FCNR);POKE64e.FtNR3iPR 

INTT HOP13 E 13CN] - : PDKE2I 1 ,3l-f3*NR 

1060 ftt=R IGHTt [STRSCFtNR 3 3 .LENCSTRt CFCNR 

UJ-1 r.M= 0-i-fii; PRINT TREU3' +RIGHTMA*, 

2} 

1038 RETURN 

1100 FtNR 3 -FCNR 3fl : IFF CNR 3>l3THENFtNR)=0 
1110 RETURN 

1120 REM xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

1 125 REfl * CURSOR X 

1130 REM xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

1110 L=(X-1 3*2tCY-l 3*48*1824: RETURN 
1199 REM * 
NED 

1208 GOSUB1140:POKEL.160:POKELtl .160 
1218 1FY<L21THENY=Y+1 
1220 GOTOlGBfl 

1239 REM * 
OP 

1300 GOSUB1140:PDKEL.160iPOKEL-M .168 
1310 IFY>1THENY=Y-1 
1320 GOTO1600 

1339 REM x 
UENSTRE 

1 400 GOSU01 1 40: rOKEL . 160: POKELt I , 160 
1410 IFX>1THENX=X-1 
1420 GOTO1650 

14 33 REM * 

HJJRE 

1500 GOSUBU40:POKEL.ie0:POKELtl .168 
1510 IFX<12THENX=X-M 
1520 GOTO1B50 

1600 L*= 0 *-RIGNT*f STR*( Y 3 .l_EN(5TR»( Y 3 3- 
1} 

1610 PRINT f HOflH l0CN3t3BCHJtUHTJ +RIG8T 
*CL»,2 J:RETURN 

1658 L*= 8 -RIGHT*tSTRiCX3,LEN[STR*CX33- 
1660 PRINT "f IIOM 3t 8CN3C 36CHJC UHT 3 '+R1GHT* 



fL*,23iRCTURN 

1670 REPI xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
16?1 REM * TEGN SPRITE * 

1672 REPI xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
i 700 NR=UflL[ K* 1- 1 ; GOSUBl 1 40: PQKEL+F ,FCNR 
1: POKELtF+1 .FCNR3 

1710 PL = INTCCX-1 3/4 3tCY-l 3*3*832; T*= 
1720 L2=INT( CX- 1 3/4 3*8t(Y-l 3*40-HB24tF: F 
ORLI =L2TOL2t6STEP2 

1730 IFCPEEKCL1 3AND15 3=FC 8 )THENTi=T*+ 01 
:6OTO1760 

1710 IF(PEEKCLl 3flNDl53-FC l 3THENT*=Ti"K'i l 
: GOTO l 760 

1750 IFtPEEKCLl 3AND15 3=FC2 3THENT*-T** 10 

: GO TO 1760 
1755 T»=T** 00 
1760 NEXT 
17.78 TL=0:C=0 

1790 F0RZ:8T01STEP-i:C=Cfi 

1790 TL = TL+UPL(|1ID*eT».r .1 3 3*2f CZ-1 3 

1800 NEXT: POKEPL.TL: RETURN 

1850 GDSUB114B:P0KELtF.15:F0KELtF+l ,15!G 
OTO1710 

1900 F0RL-832T0894:P0KEL.B:NEXT 

1310 PRINT rHOM] : : FORL=l T02 1 : PRINT 1 GR3 

U REU 3C 24SPC3I 1 6CH 3 " ; : NEXT 

1920 RETURN 

1978 REM xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
1990 REM * UDUIDELSE * 

1998 REPI xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
2000 IFK* = ' f CYN 1 " ANDPEEKCKOi-23 3 =0THENPOK 
EK0t23. 3: RETURN 

2018 1FK*= t CYN3 ANDPEEK CK0t23 3=3THENpOK 
EK0t23.8 

2020 IFK*= fPUR] ANDPEEK C K0i-23 3 =4 THENPOK 
FK0t23 ,7: RETURN 

2830 IFK4= TPUR] (WDPEEKCKOr23 3=7THENPOK 

EK0t23.4 

2840 RETURN 

2870 REM xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
2080 REM X DflTflUNIER * 

2090 REM xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
2100 PRINT'I CLR3( LTBLU3 CHRM9 ): P0KE5328 
0, 14:P0KE53Z81 ,6 

21 18 P0KEK0+21 .0: INPUT C HOpllSTflRT L INIE 
NUMMER "JS 

2120 IFS>63334THENPRINT TCN3FOR STDRT I '• 
G0TD21 18 

2130 IFS^BTHENPRINT TCN3FOR L IL LE I : GOTO 
21 10 

2135 PR INT" r CLRH2CN] S REP1C 4SPC3SPRITE 
UftTflt 2SPC.I ": 

2140 S=S: TL = 13: FORL =832TOB94 : TL =TL-rl 
Z150 IF rL = 11THENTL=l ; S-S-M : PRINT T CU3 "" ! 
PR I NTS " DftTfl " : 

2160 FRlNtPEEKtL 3*T CU] , ::NEXT 
2170 PRINT TCU] ":PRINT LIST[H0M3 : 
2180 FORL-631T0636:POKEL . 13; NEXT* POKE 198 
.6: NEW 



KONTROLSUP1 FOR SUPER SPRITE 



10 


239 


11 


195 


12 


214 


13 


195 




47 


15 


30 


L6 


195 


i? 


2 39 


21 


58 


Z2 


59 


23 


239 


24 


177 


25 


239 


30 


123 


58 


13 


68 


86 


78 


14 


80 


63 


90 


18 


180 


1 14 


105 


154 


I 18 


58 


120 


32 


121 


35 


122 


146 


323 


232 


124 


244 


125 


93 


130 


47 


200 


65 


210 


176 


220 


162 


230 


135 


248 


162 


250 


188 


268 


194 


270 


230 


280 


14 


290 


93 



41 



300 


63 


310 


226 


320 


184 


33R 


It 


340 


120 


350 


238 


360 


71 


370 


66 


390 


137 


390 


I 21 


400 


Z51 


4 10 


Z52 


120 


79 


430 


167 


418 


61 


450 


157 


460 


171 


4 70 


167 


. ... 
300 


137 


501 


236 


502 


197 


510 


1 8 


520 


I 34 


530 


16 


510 


1 92 


550 


248 


560 


121 


570 


1 31 


590 


7 


590 


8 


600 


45 


610 


I 26 


620 


95 


630 


I 29 


610 


SI 


650 


& 


ggg 


3 l 


1000 


155 


I 001 


56 


1002 


1 55 


1010 


115 


1020 


57 


L03PI 


79 


1040 


210 


1050 


195 




13 


IB65 


62 


1070 


235 


L0S0 


1 05 


1090 


112 


1 100 


204 


t 110 


112 


1 120 


159 


1 125 


161 


1 I 30 


155 


1 140 


218 


1 195 


176 


i280 


238 


1710 


221 


1220 


80 


1239 


I 20 


1300 


Z38 


1310 


L73 


13?0 


80 


1399 


0) 


1100 


238 


L1I0 


i pa 


1120 


35 


1199 


94 


1 500 


238 


15I0 


221 


1520 


85 


•- '-I'M 


82 


1610 


13 


1 650 


80 


1668 


235 


1670 


155 


I67i 


72 


1672 


155 


1700 


251 


1710 


181 


1 720 


1 02 


1730 


35 


1710 


37 


i750 


37 


1755 


218 


1 760 


t38 


i770 


Z25 


1780 


109 


1 790 


36 


1900 


1 31 


1950 


249 


iae0 


1 54 


1910 


167 


1920 


L12 


1 970 


155 


1 580 


8 


1990 


155 


2800 


246 


2010 


&s 


2020 


239 


2030 


39 


2010 


1 12 


2070 


155 


2080 


32 


2090 


1 55 


2100 


215 


21 10 


113 


2120 


126 


2130 


1 19 


2135 


25 


2MB 


238 


2150 


L09 


2160 


252 


2170 


59 


2180 


118 







Deres problem: Generende stflj fra edb-printer 

lasNiNe: SILENCE PRINTER-BOKS 



Sir) mHr vhvnr form vrte 
gem>tode - st«j twlonfrar 
atreu. os dwmed nedaasilra 
eftBtttvHntan 

Sui ha «ckvpr*M* lumrnvw 
tkkq i^gre si giw prutrts- 

Mad «n S*ENCE PRINTER 
- Bc*s ocrt* Da 
* EFFEKT (V D-tMPNING 
•BEDRE ARBEJDSMlLJa 



5IUNCt PRINTER BOftS fr dfltisk hvaitrai. Ofl levses til aiit pmitrivrwt. km ogtl 
•"■MfnedboB. 

Lewwei gartrmm Own tndvantge «db -l*vwand»i bo«i i In -■ r« m fabcik 

Ring afwr vda>bgA» oplvwmger — t& umtor vi Dam vor brocTHir* ll» Dm kan |0 ne» 
■-- MHh hvBO * ' . ■ .-:r. i i ■ v D»m p>ini»r sioIn i t>3<r0L*ufen) 

SEE 

Ingrids Alle 3 ■ 5250 Odonse SV 
TM. (09112 67 81 



PS Vi tmj*< »ori|»( n>»<1 fu»har>dl*« 




commodore 

Konto uden udbetaling 
op til 48 mdi\ 




Commodore 128 kr. 4.795.-' 

Commodore 64 computer 2.395- 

Commodore 1541 (loppy disk 2.895.- 

Commodore 801 printer 2.445.- 

Commodore 1702 farvernonitor 3.195- 

Commodore disketter 10 stk . . . 199.- 

Vi er kendt for vore gode service ogsa efter kob! 
BEIAFON TLF. 01-3102 73 

ISTEDGADE 79- 1650 K0BENH AVM V 



CotTwrwdora 




IBM Kompatibel Commodore PC10 
med 256K.RAM... 

2 diskettestationer a 360 kb 



MS-DOS 
GW-BASIC 
Printer CPA 80 
PC Partner Talk, 
Kommunkationsprogram 
PC Partner Erhverv 
fuld integreret uden 
systembegrsBnsning og 



med aben access 
bestaende af: 

- Finans 

- Debttorer 

- Kreditorer 

- Lager 

- Fakturering 

- Ordres tyring 



Incl. opstilling og 
instruktion (uden for 
Kobenhavns og Fr.borg Amt 
tillaeg 1.000 kr!) 
Spec, tilpasning til 06res 
behov, f.eks. atdelingsbehov 
etc. leveres for mindre 
tillaeg efter tilbud. 



Grundet vorea store 
SUCC8S kin vi rted- 
sntte voro a pria til 



2S.9H5,- 

excl. moms 

ApS (I.I.B. Elektronic Data Inc. 



Lillevangsvej 3 - 3520 Farum 

Telefon (02)9$ 51 70 



42 




Pixstik 
395,- 



Mus med 
software 

895,- 



Kalkulation: 

Calc-Result easy 

995,- 

Calc-Result advanced 




Commodore 128 
80legnskabeltil 199,- 
Philips/Sanyo monochrom 
Sanyo monitor 5.495,- 
Philips monitor 5.495*- 
-begge til 40/80 tegn 



Danske programmer: 

Eventyret band 129*- 

(Dansk eventyr med grafik!) 
Tips-Master disk 149,- 

498,- 



Kartotek 



disk 



Commodore 64 
+ 1541diskettestation. 



^Tekstbehandling: 

Easy Script DK 585,- 
Viza Write DK 1.395,- 



Kun 



4.995, 



' Touch Point 
(Tegnebord) 

485,- 



Administrativt: 

I Finans-Master 1.995,- 

Nyt bogfaringsprc-gram 
■ til Commodore 64. 

' Heltsikkertdeibedstt 
Fa det dernonstreret f 



; 

1 



t5« 



Commodor^ 
128 



698.- 



Kr. 



/WRODATk 

Osterbrogade 117 - 2100 Kot>enhavn 0 - TV. 01-18 33 66 




Indtastningsvejledning 
for Commodore 64 & VIC-20 




De programmer, der trykt er i RUN, 
ser lidt anderledes ud, end du er 
vant lil at se pa din s kserm etler prin- 
ter. Det skyldes, at vi har anvendt et 
sserligt printprogram, der »oversaet* 
ter« de grafiske tegn til et mere lae- 
seligt sprog. Vi beder dig derfor la?- 
se indtastnlngsvejledningen om- 
hyggeligt igennem. for du starter 
med at indtaste dine programmer. 



Alle de grafiske tegn er i vort printpro- 
gram sal mellem lo Kantede parente- 
ser, og du skal saledes IKKE indtaste 
disse parenteser eller det, der star 
imeHem. Du skal trykke paden eller de 
taster, der svarer til det. der er skrevet 
mellem parenteserne iflg, skemaet 
her pa siden Star der et tat umiddel- 
bart efter den fflrste kantede parerrtes. 
skal de pagasldende taster trykkes det 
antai gange, der star skrevet. 
Star der SPC mellem de kantede pa- 
renteser, trykker du pa nnellemrums- 
tast. Star der et tal toran SPC, trykker 
du lasten det antai gange. 

Du vil ogsa komme ud lor, at der 
imellem parenteserne f eks. star S/A - 
i sa tilfeeide trykker du pa SHlFT-ta- 
sten og A. Havde der i stedet staet C/A. 
skulleduhavetrykket paCommodore- 
tasten og A. Ogsa I disse tilfcelde. kan 
der vaare el tal, der angiver antai gan- 
gs- 



Kontrolsum 

I programmerne til Commodore 64 er 
der knyttet et sakaldt kontrol sums- 
program, der kan lette fejlfinding ved 
indtastning. Fremgangsmaden ved 
brugen af dette program er (algende: 

1. Du starter med at indtaste kon- 
trolsurnsprogrammet og gemmer det 
til fremtidig brug. 

2. Far indtastnmgen at de ovnge 
programmer starter du med at indlaese 
kont rolsumsprog ra mmet . 

3. Sa indtaster du dit program. 

A. Tag altid en kopi af dit program, 
inden du tester det. 

5. Skriv GOTO 62000 og besvar de 
sporgsmal, som programme! stiller. 

6, Sammenlign de kontrolsummer 
med de, der er trykt i bladet og find de 
linier, hvor du evt. har tastet fejl . 

Almindelige rad. 

Vffir meget omhyggelig med Ind- 
tastningen, og specielt nar det drejer 
sig om de sakaldte DATA-linier. En fejl I 
disse linier kan forarsage, at compute- 
ren »g£r i baglas« og du bliver nadt til at 
slukke for den. 

Derfor endn u en gang: tag en kopi af 
dit program, inden du karer det. 

Hvis computeren giver en fejlmed- 
delelse i en linie, hvor der findes en 
READ-kommando, kan du vsere na> 
sten stkker pa. at fejlen IKKE skal tin- 
des i den pagseldende Itnie, men der- 
imod I en af DATA-linlerne. 

Hvis du indtaster en programllnie, 
der fyider to linier paskesrmen fuldt ud, 



(80 tegn} vil cursoren springe ned i den 
tredje linie. Et tryk pa RETURN-tasten 
her vil IKKE indlsese den pagseldende 
lime. Du er t sa tilfaelde nadt til at trykke 
cursoren en eller to linier op, far du 
trykker pa return. 

Programmerne i RUN 

Programmerne, der er trykt i RUN. er 
testet og kan funktionere. Da program- 
merne mange gange er ret komplice- 
rede, kan vi ikke 100% udelukke, at et 
program i en speciel situation vil kunne 
opfere sig uventet. Dette er dog ikke 
normalt. og i sa tilfaaide vil redaktionen 
naturligvis vaare taknemmeiig for en 
SKFtlFTLIGorientering. Derimodskul- 
le der ikke leengere vEere nogen tek- 
nisk fejimulighed i proceduren fra 
diskette/bSnd til trykning i bladet. 
Eventuelle rettelser og korrektioner til 
programmer eller artikler I RUN vil sa 
vidt muligl blive bragi t det efterfalgen- 
de nummer under rubrikken RUNA- 
MOK . Vi beder laeserne om I KKE at ret- 
te telefonisk henvendelse om disse 
ting. 

RUNs redaktion kan heller ikke pa- 
tage sig telefonisk at veere Iceserne be- 
hja?lpelige med fejlfinding ved indtast- 
ning eller tvivlsspargsmaf om pro- 
grammerne i det hele taget. Hvis man 
har laast sin brugervejledning og folger 
denne vejledning. skulle indtastningen 
af programrnerne ikke give de store 
problem er. 

God fornfljelse. 
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62000 REM KONTROLSUM PROGRAM 

62010 GOSU0 62058 

62820 GOTO 62200 

621330 IF Fl>=8 THEN 62020 

62010 END 

62050 DEFFN QEEKCXJ = PEEKCX )*2S6*PEEKCX 
♦13 

62060 Df*TF> *** 

62070 DATA l 65 .252 . 166 ,253 , 1 33 ,028 , 131 ,0 
21 .032.019 

62080 DATA 166, 216, 160, 001, 1,??. 035,133, 2 
51 ,210,013 

62090 DATA 700 . \?? ,035 , 133 ,25? ,200 , 177 .0 
95.133. 253 

62100 DATA 700,163.000,133,251 ,177,095,2 
10 .006.021 

62110 DATA 101.253,700,208,211.096 
62120 DATA - 1 
62130 AD = 52332 
62110 RESTORE 

B2150 READ 14: If Ti THEN 62150 
62160 READ T : IF T>=0 THEN POKE AD.T : 
AO * AO+1 ; GOTO 62160 

62170 PRINT~LCLR3H'.'0R 8NSXES KONTROLSUM 
PR1NTET; " 

621R0 INPUT'-TU/ttONITrjRsB PRINTERS Pl.OTT 

ER=6*'i oeu 

62190 RETURN 

62200 RFJ1 DO INI TALI SAT ION 

62218 FL = 0 : INPUT "F0RSTE LIME " .* FL 

: IF Fl.<0 THEN RETURN 

62220 LL = 65536 : INPUT "SlUSTE LINE "f 

LL:PR1NT "[ CLR 3" 
62230 IF DEU>0 THEM OPEN 1 ,DEU 



62210 LN e FL : C = 0 : CI = 0 
62250 POKE 252 . LN- IMT(LNx256 J*2S6 : POKE 
253,LN/256 

62260 SVS 52992: CSePEEKt 25! J: LN =FNDEEKL2 
52 J+l 

62270 Ti = LEFT*CSTR4CLN-n+"L6SPCJ".6J-f 

LEFTUSTRilCS }* "L7SPCJ " ,7) 

62-280 IF OEU=0 THEN PRINT Ti; 

62290 IF DEU>0 THEN P8INT»i,T*i 

62300 IF DEU=0 THEN C - DM : If C>=3 TH 

EN PR J NT : C = 0 : CI * CI ♦ 1 

62310 IF DEU>0 THEN G - C+l : IF C>=3 TH 

EN PRINTP1 ; C * B ; CI * CI t I 

62328 IF LN<=U AND PEEKC251 ) THEN 67750 

67330 IF DEV>0 THEN PRINTH : CLOSEl 

62310 END 



KONTROLSUM 
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I 


67130 


130 


67118 


310 


62150 


167 


67160 


29 
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161 
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137 


62330 


38 


62310 


128 
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Lyd -generatcren i 

CBA4 64 



af Bjarne V. Jensen 



I de sidste to numre af RUN har |eg 
beskrevet tyd-chip'en i Commodore 
64 og alle dens forskellige indstil- 
lings-muligheder (stemmetype, lyd- 
styrke-forlob, modulation, filtre). 
Selv om man kender lychip'en godt, 
er det sjasldent. at den lyd, man pro- 
grammerer, lyder som man havde 
tsenkt slg. Maske har man regnet 
forked, da man lagde de forskellige 
bits sammen, eller misforstaet 
brugsanvisningen, eller maske skal 
der bare justeres lidt pa et af para- 
metrene. Som regel kraaves der 
endnu et par beregninger og for- 
sog, for lyden er, som den skal 
vaere. 

For at undga alt dette besvaer, 



ESCOM 
praesenterer 

EPSON GX-80 




EPSON GX-80, Printeren for 
Dem som kun vll have 
det bedste 

GX-80 er EPSON'S nyeste dot mairix 
printer GX-80 har bla. NLQ og er derfor 
veiegnet som printer til textbehandling, 
GX-80 lev&res bade mod frikttonsrullsr 
og traWor <Jrev. GX-80 har selvtalgelig 
dansk togrtsaet i en 9 x 9 matrix. GX-80 
leveres klar til brug incl. et af ftg. interfa- 
ces: Commodore. ATARI, Centronics pa- 
rallel. IBM-PC. Apple 2c, AMSTRAD eller 
MSX 

GX-80 tester kunkr. 

B5495t 
incl. mom.3 og 1 In gitanii 
Norregade 12 
OK-980O Hjorring 
TH. (08) 92 60 21 




har jeg skrevet programmet »lyd- 
generator-. Med dette program kan 
man nemt indstille lyd-chip'ens for- 
skellige parametre, samtidig med at 
man horer. hvordan det lyder.. Nar 
man er tilfreds med lyden, kan man 
fa udskrevet et lille lydprogram. 
som indeholder alle de komman- 
doer, der skal til for at trembringe 
denne bestemte lyd. Man kan f£ 
programmet udskrevet pa skasr- 
men eller pa printeren. Man kan 
ogsa fa programmet ned i compute- 
ren, sa det kan save's eller merge's 
med et andet program. 

Programmet 

Programmet starter i linje 100 med 
subrutine 680. Her printes skaerm- 
billedet med de tretten forskellige 
parametre, som kan justeres. Der- 
efter indlaases og printes de tretten 
startvasrdier i linierne 840-850. Hvis 
du cnsker andre startvaerdier, end 
dem jeg har valgt, sa kan du andre 
tallene i linje 850. 1 linjerne 880-950 
printes resten af skasrmbilledet, og 
lyd-chip'en indstilles efter de tret- 
ten startvaerdier. 

Linje 110 er en pauseslojfe. som 
bestemmer hastigheden af juste- 
ring og cursorbevsegelse. Linjerne 
120-170 er programmets hoved- 
venteslojfe. I disse linjer underso- 
ges. hvilke taster, der trykkes pa. 
Programmet kan nemt laves om til 
at sty res fra en joystickport, ved at 
aendre disse linjer. 

Tasterne f3 og f5 benyttes til at 
justere de parametre, som curso- 
ren peger pa. Det gores ved at der 
hoppes til en af de tretten juste- 



ringsrutiner i linjerne 190-290. Ta- 
sterne f1 og f7 benyttes til at flytte 
cursoren op eller ned. Det foregar 
i linjerne 300-330. 

Subrutinerne i linjerne 340-460 
benyttes bl.a. af justeringsrutinerne 
til at opdatere skasrm og lyd-chip. 

CTRL-tasten benyttes til at fa ud- 
skrevet et lydprogram med den ind- 
stillede lyd. Udskriften fas enten pa 
skasrmen eller bade skserm og prin- 
ter. Det foregar i linjerne 470-670, 
hvorefter programmet afsluttes. 
Programmet kan startes igen ved at 
trykke pa return. 

Man kan ogsa vselge at fa lagt det 
program, som nu star pa sksermen, 
ned i computeren. Derved slettes 
programmet »lyd-generator«. men 
til gengaeld har man nu radighed 
over lyd- programmet, og kan gore 
med det, hvad man vil. 

Hvis man har et heft tredje pro- 
gram, som man onsker at forsyne 
med den lyd. man lige har fremstil- 
let, kan det gores ved at load'e 
dette program ind i computeren, 
mens det lille lydprogram stadig er 
pa skasrmen. Derefter flytter man 
cursoren op, og trykker pa RETURN 
ud for hver programlinje. Linjenum- 
rene kan rettes inden der trykkes pa 
RETURN , sa de kommer til at passe 
ind i dit program. 

De lydprogrammer, som fremstil- 
les med dette program, benytter 
generator nr.1 i lyd-chip'en. Hvis 
der anvendes modulation, bliver ge- 
nerator nr. 3's frekvens-register 
ogsa benyttet, men ellers kan gene- 
rator nr. 2 og nr. 3 benyttes til andre 
lyde. 
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L YD -GENERATOR 

igb Gosuseea 

HA FOR I =17065: NEXT 

170 N=PEEKC 1 9? J: IFN=5THEN£=1 : GDT01 80 

130 IFN=6THENS?-1 :GOTOie0 

110 IFN=3THEN3B0 

150 1FN=4THEN320 

160 1=FF_EKC651 ]: IFI=1THEN170 

170 POKEUtl .KtSGNf IJ:GOTai20 

160 ONX GOTO I 00 .200 .71 0 .720 .230 .230 ,210 .2 

fl0.2S0.760 .270.280.290 

190 GOSUB310:GO£UB100:GOTO110 

200 GO£UB350:POK£UtI .NCX3:GOTOl2B 

210 GO£UB310:POKEUt3 .NtX): G0TO1 IB 

220 I=3:G0£U83eQ:PRINTTflBt4 3£i(NLX)J:G0£ 

UB130:GOTO1 10 

230 GC£UB340:GO£U8440:GOTOM0 

210 GOSU8310:GOSUP150:GOTO11B 

250 I=2:GO£UB380: PR I NTT ABC 4 )fl« ( NCX ) 3 ! GOS 

UB430:GOTOl 10 

260 GOSUB3S0 : POKEUt 1 5 .N C X J : G0T01 20 

270 1=4: GOSUB380" PR 1 NT TAB C 4 3F t C NCX 3 J : GDS 

UB4BB: G0SUR16B: GDT01 10 

280 GOSUB310: G0SUB16B: GOT01 10 

290 GOSUB3S0 i P0KEUt22 . N t X J : GOTO 1 20 

300 X=Xfl: IFX>13TH£NX-13: GOT017B 

310 PR I NT"C GRNH C03t 3SPC3C CN3L2CUJ>>[LTB 

LU3": GDT01 18 

320 X=X-1: IFX<lTHENX=t: GDTO120 

330 PR1NT"CGRN3CC03C3£PC3C C03C 2CUT »t LT. 0 

LU3":G0T0l 10 

310 1=15;GOTO360 

350 I =255 

360 N=NCX3t£: IFN>IORN<0THENRETURN 

370 MX 1*H : PR INT "t CO JC 3CH3 C 1SPC3C CO 3 " : PR 

JNT7PBC3 3N: RETURN 

380 N=NCX3t£: I FN > I ORN <BTHENPR I NT t 2C03 " '• 
RETURN 

390 NCX3=N:PRINT" t COK 3CH3 E 6SPC 3C C03 " : RE 
TURN 

100 p=l6>Ntl 1 3: IFn=6lTMEN(*i=80 

110 IFn = 18TH£Nr'=61 

170 pQKEUf 21 ,HtN( 1 3: RETURN 

130 K = 2T(1tM4 3 jT2*Mt3):POKEU*1.K-rSGMPE 

EKCBS1 3 3: RETURN 

110 POKEUT5.ie?NCS3*N(63:R£TURN 

150 POKEU16, !63<NC7 3-rNC9 3: RETURN 

460 P0KEUr73. 16*NC 12 itSGNCNC M 3 3 = RETURN 

470 PQKEU-rl , 0 : P0KE1 38 .0: PR INT "C CLR3C 3CM3 

'V'CS/FJ = [S/PJRINTERUDSKRIFT" 

480 GETG4: IFG4=~ "THEN190 

430 ] f G t = ~ P " T HENOPEN I .1: CHOI ! GOTO510 

500 P0KEU-t1,K:PRlNT"[CLRJCLTBLU3 NEUC GRN 

3C2CN3" 

510 Pi="POKE Ut:PR1NT ' 10 U=54272"' : PRl N 
T" 15 ,"NC2) 

S20 N=20: lFNC43=2TriEN;PRINTN;Pi'3.-NC3J: 
N = 25 

530 PRINTN; P4>"5 . " 1 6*N(.S )tNC6 3 ; N=Mt5 
540 PRINTN; Pi 6.' 16»NC?3tNC03:N=Ht5 
550 IFNC3 3=BORNC1 J-30RCNC3 J = 2PNDNC4 3>0JT 
HEN57B 

560 PRlNTN;P4"15 . N C 1 0 J: N = NtS 

570 IFN-tll 3THENPRINTN;Pi" , 27."NCI'3 3:NsNTS 

580 3FNCH 3THENPRINTN;P4"23. M NC12)>l6-rl: 

N=Nt5 

590 PP3NTN.-Pi.-21 .' HtNtl 3:N=Nt5 

600 PR3NTN:Pi"4 . 'K* 1 "C6SPC3 : REP STp.RT":N 

=NtS 

610 PRiNTN'FORN=noiS00;NE>Tt7SPCj:REn P 
AUSE":N-=NtS 

620 PRINTN;P*"4. K' C6SPC3;RET» STOP 

63B I FGi =-p"TH£NGi = * * " : PR I NT M : CLOSE 1 ! GOT 

O5B0 t , 

61B PRINT'[2CN3C LTBLUJ CS^HIUIS OU SKPL 

BRUGE OETTE LILLE 

65B PRINT" FROGPpn. SflA TRVK 'CURSER-HOn 
66B PRINT" OG 0ER£FTER"N>5-GANGE ' RETURN 



670 PR3NT"C3CN3C 7SPC3RUN: TRVK RETURN: R 
UNC GPNJ[3C0J";EN0 
600 U=S427?:PiriNCl3) 

690 PR I NT ~i CLR 3 " CHR4 CI 4 3: POKE53280 . 3: POK 
E53291 .0 

700 PRINT . ~[ LT8LU)tREUTt35FCH S/LJYD-GEN 
ER^TORC 3SPC3C 2CN3C GRN 3 
710 PRINT .~t£vLjYOS7YRKEtespC3t0-L5 3 
72B PRINT .' CS/P3REK'JENSE8SPC3 C0-2SS 3 
73B PRINT . [S^P3UL£-BREDDE[6SPr.] C0-153 
710 PRINT .' CSx£3TFnrr.C TRI SflUI PUL NSE3 
75B PRINT . 'CSWUTTflCKC 1 ISPC3C0-153 
76B PRINT . "£ 5x03 ECPYt 12SPC3CB-1S3 
27B PRINT . CS/S3USTAINC 10SPCJ (B-15 3 
780 PRINT .-CS/RJELflISEt 1BSPCJC0-15 3 
73B PRINT. -CS,'H]ODULflTIONC4SPCJC0 SY RP J 
800 PR 1 NT . " C S/fi JOD - FREKUENSC 1SPC3 C 0-255 3 
BIB PRINT . 'LSyfllLTERC2£PCJtB LO BO HI N 

tj 

820 PRINT. tS/f JlLTER-ff£.SONflNSC?SPCJ(B-l 

53 

030 PRINT ."CSyFJILTER-FREKUENS t.B-7553 
81B PRINT "t HOH 3C 3CN3CLTBLU3": F0RN=1 T013: 
REAONCN 3:FRINTTflBC3 3NCM):N£XT 
8SB 0p.7P.lS. 33,1 .2,12.12,13 .11 .1 .7.2 .15.3 

1 

860 FORN = 0TO1: REPPSi CN ) .M CN 3 . F 1 CN 3 : NEXT 

97B DpTp.TRlP.B.0.£flWT. SYNC .LOU. PULS. RING 

.BAND. NOISE. .HIGH. . .NOTCH 

690 PRINT . "[2CN3C£^£3CS/H3t£/'nC £/FJC£yT 

3tZSpC3 = C2SPC3[.S/'T]ONE-TPST'•: PRINT . "CCN3 

F1-F7C 7£PC3iC7£PC3C £VJ 3US7ERING 

B9B PRINT ."[CNJCSyC3CS/T3tSx'R3CS/L3t3SPC 

J=[ 2£PC3C£^-OJPTflLlSTE 

300 FORN=UTOUt24:POKEN.0:NEXT:POKEUt1 ,NC 
2J 

310 P0K£Ut3,NC3 J:POKEUt1S.NC103: P0K£Ut22 
.NC133 

320 GaSU010B:GOSU0<ne: G0SUB14B: G0SUB45B: 
G0SUB46B 

33B PRINT "t HOH 3C7CN3C4SPC 3 "S4CNC1 3 J 'LICN 

r 

310 pRINTTPBC13n4CNC3 3 3:PRINT:PR!NTTPBC1 
3F4CNCM J3 

350 X=l:PRINT"CHOn3C4CN3-t GRN3 >>[LTBLU3 - 
: RETURN 
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710 


70 


720 


21 


730 


62 


710 


110 


750 


11? 


760 


37 


770 


226 


780 


132 


730 


233 


380 


163 


010 


131 


820 


23 


830 


10 


810 


218 


850 


168 


860 


lit 


e?B 


110 


880 


80 


630 


37 


900 


23 


310 


113 


320 


153 


330 


ia 


910 


149 


3S0 


137 







47 



COMind... _ />«X ...COMud 

al Hennfng Randmose £ j P/f]7VlATi I /? ^(T 



COMind 

Til RUN 

Hvordan fir jeg en grafikskeerm 
fremstillet med Comal 80 vers. 2.01 
udtegne! pS plotter 1520. 

Venlig hi/sen 

F. von Muller 

Gallebjergvej 14 

4593 Eskebjerg 

COMud 

Jeg har forstael sporgsmalet sa- 
dan, a! du gerne vil vide, hvordan du 
kan »durnpe« grafikskasrmen til din 
1520 plotter. 




Nedenstaende program klarer at 
dumpe grafikskaarmen, del tager 47 
minutterat »dumpe« del Idle demo- 
program, sa |eg haber. du er et tal- 
modigt menneske. 



Programme! virker pa den made, 
al FOR lokkerne sammen med 
funktionen GETCOLOR(x.y) aflaa- 
ser hele sksermen. Nar GETCOLOR 
returnerer en vaardi, der er forskel- 
lig fra baggrundstarven. udfores IF 
sastningen. 

Baggrundsfarvens vaerdi retur- 
neres af funktionen INQ(nr.|. Altsa 
nar veerdien i GETCOLOR er for- 




skellig fra vasrdien i INQ, udfores 
IF-saatningen. Hvis du i anden for- 
bindelse vil have det styret af pen- 
farve, sa skal du bruge ING(6). (se 
side 157/158 i Comal manualen for 
en fuldstaandig oversigt over 
INQ(nr.). 

PRINT FILE 1 : »M« eller »D». »M« 
flytter til pos. x.y i forhold til abso- 
lutte startpunkt 0,0 (pen oppe), -'D« 
tegner til pos. x.y i forhold til abso- 
lute startpunkt 0.0 (pen nede). 

Husk at kore papiret et godt 
stykke op, den tegner baglasns. 

Rigtig. god tornojelse. 



mm f hi mr 1 3?0 closed 

2 Mftfe 

www* , 

print *i - ; 
Hi* I s 

Ill* I s 
HI* V* 
III* * 5 



PI 110 

01 HO 

Pt6W 
0?70 



print 
pr in! 
prini 
pr int 
print 

lend ' 4 



end to* Y 
ervd*o' X 

MS** 
u *> aw**** 

J,33C wlNDOUil-l.l.'^l ) 
S step . 



.? do 



0417 BEUt585 

0470 end -JtG ER r* 



do null 



ROlG" 
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af Flemming Lerba?k 



Som en mere behagelfg muse- 
plage, dukker disse sma hjelpe- 
midter nu op til Commodores ma- 
skiner. RUN tog fat i halen pa et af 
de srn^ vaesener, puttede den i et 
glas og tog den med pa redaktio- 
nen for at se naermere pa denne 
IHIe afart af dyreriget. 

Musen kan fungere i eget pro- 
gram. Et sidant er med i vejlednin- 
gen - som er pa tysk Del er bare 
underfigt. at man ikke lagl program- 
met ind pa lapen. som det andet 
program er indeholdt pa 

Na, men det er ikke ret langt. En 
lille maskinrutine. som er nem at ga 
til. Noget mere omfattende er det 
tegneprogram, der hedder 
»Cheese«. Det er simpelthen frem- 
ragende. Alt fungerer, og der er 
mange muligheder, som alle vaslges 



MuselejerUgt 



via et system af symboler og farver 
- og sa et tryk pa musen. 

Hell uden lune er symbolerne da 
heller ikke. F.eks. er tilbagekald af 
udfort ordre symboliseret ved en 
kat! 

Programmet varer knap syv mi- 
nutter at loade ind - bare det var 
udstyret med turbo eller forela pa 
disk. Nar denne talmodighedsprove 
er overstaet, rader man over fol- 
gende muligheder: 

Farveleegning med 16 farver til 
brug bade pa baggrund, til penslen 
eller til fill-funktionen. Kredse, fir- 
kanter. lige linjer. frihandstegning - 
alt er muligt. Der er ogsa valgfri pen- 
seibredde, punkterede linjer eller 
sprayvirkning , Programmet kan ko- 
piere et skeermafsnit, sa mange 
gange det onskes. Der kan foreta- 
ges pull down eller up. Elementeme 



i tegningen kan spejlvendes drejes 
og forstorres, sa hvert enkelt punkt 
kan bearbejdes. Herunder afslores 
det, at oplosnmgen er den sakaldte 
multicolor, altsa to pixels bredde pa 
hvert punkt. 

Programmet er i stand til a! 
■•save- og -loade- et sksermbillede 
pa band. Det tager ca. 6-8 minutier. 

Endeltg kan programmet lave en 
hardcopy til Commodores 802 og 
803 printere. Det kan bruges pa en 
128'er, men den skal kore t 64 
mode. 

Jeg kan varmt anbefale musen 
under juletraset den 24. - og det lille 
vaasen kan i hvert fald ikke gore no- 
gen bange. 

Navn: NCE-maus 

Importer: Magnafon Elektronik 

Tlf. (01) 39 20 39 

Pris: kr. 895,00 



DO omor CO pnrjCC nnrj r 
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Dun i ul in iuivl. 



Fred^aard 

Amage r Centra. Reherbanvgade 3. (01)5702 22 
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RUN SOFTWARE CLUB optager 
automatisk alie, der har kobt soft- 
ware gennem RUN, som medlem- 
mer. Medlemskabet er gratis og 
uforpligtende, men medlemmerne 
vil med jsvne mellemrum fa titbudt 
lorskellige produkter til reduce- 
rede priser. 



Hvordan bestiller man 

Vore priser skulle heist vaere sa lave 
som muligt, og de er derfor baseret 
paforudbetaling. Dette giver mindst 
mulig administration og den hurtig- 
ste ekspedition. 

Det nemmeste er at ga pa post- 
huset og udfylde et girokort med dit 
eget navn og adresse, vores navn 
(RUN, Torvegade 52. 1400 Koben- 
havn KJ og vort gironummer {1 48 
31 61). Du skal selvfolgelig ogs£ hu- 
ske at skrive praecis, hvad det er, du 
bestiller. 

Du er naturNgvis ogsfi velkom- 
men til at sends en check, hvis det 
passer dig bedre. 



Programlistninger Ira bladet. 

Siden starten har vi solgt band og 
disketter med de programmer, der 
er listet ud i bladet. Vi har bSnd og 
disketter helt tilbage fra starten. og 
fortssetter naturiigvis denne service 
overfor lasserne. 

En programdiskette koster kr. 
118,00 pr. nummer, mens den til- 
svarende bSndversion koster kr. 
98,00 

Vores bestseller. Privatregn- 
skab, f&s ligeledes endnu og koster 
kr. 198,00 for save! bind- som di- 
sketteversion, 

Tipsprogrammet til Commodore 
64 har vaaret faardig et stykke tid , og 
efter nogle rettelser og forbedrin- 
ger korer programmet perfekt. 

Programmet leveres i en compi- 
let (og dermed hurtigere) udgave 
for savel hovedprogram som prin- 
trutiner. 



Endelig har vi samtet de 15 bed- 
ste fra RUN's forste ar pa en di- 
skette. 



Regnskabssystemer 

RUN har to professionelle regns- 
skabssystemer, der begge er skre- 
vet i Comal 80 og som folge deraf 
krasver en Comal kapsel version 
2.01. 



sou 




-150 




■400 




350 




300 




250 




200 




150 




1QD 




50 




0 




-50 




-100 




-J.50 




-200 




-2S0 




-300 




-350 




-400 




-450 




-300 





1234SG709n0C 

Der findes to versioner af regn- 
skabssystemet, nemlig med elJer 
uden tjenesteydelser. Program- 
merne koster henholdsvis kr. 
375.0X3 og kr. 575.00. 

Lass i ovrigt RUN nr. 7 og 8 eller 
indsend frankeret svarkuvert for 
yderligere oplysninger. 
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Nyheder 

Vi har to nyheder i denne maned. 
Den forste er et tekstbehandlings- 
system, der fas enten pa band eller 
diskette. Programmet er i maskin- 
kode og indeholder de faciliteter, 
som de fleste har brug for. Hoved- 




vasgten er lagt pa, at programme! er 
let at betjene. Skriv evt. efter yder- 
ligere oplysninger. Band og disket- 
teversionen koster det samme. kr. 
295,00. 




Den anden nyhed er eE fremra- 
gende matematisk program, som 
enhver skoleelev, der begynder al 
arbejde med funktionsanalyse i ma- 
tematik. har brug for. Man kan defi- 
nere funktioner, fa dem fremstillet 
grafisk pa skaerm eller printer og 
foretage alle relevante analyser. 

Programmet arbejder lynhurtigt 
og kan vsere et vaerdifuldt bidrag til 
matematikundervisningen. 

Programmet fas pa diskette og 
fra januar vil det ogsa kunne fas pa 
band. Man er velkommen til at 
skrive efter yderligere oplysninger. 
Pris kr. 295,00. 

Det tre fesllige spil pa modsta- 
ende side kan stadig fa.s, og vi eks- 
pederer fra dag til dag. 

VI glaeder os til at byde dig velkom- 
men i RUN SOFTWARE CLUB. 
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TUBUD TIL AU£ UES£R£! 



M&nedens spil 
april 1985 
Commodore 





PC PC PC PC PC 



DANTEKST ■ tehstbehandling 



Eftersom PC10 og PC20 er 100% 
IBM-kompatible. findes der et nse- 
sten ubegraanset antal tekstbe- 
handlingssystemer til disse PC'ere. 
Indtil for nylig har naesten atle disse 
systemer dog vseret engelske eller 
amerikanske. Imidlertid er der de 
seneste par ar blevet udviklet nogle 
rent danske tekstbehandlingssy- 
stemer. Et at de forende er DAN- 
TEKST fra DTI Software A/S. 

RUN har modtaget DANTEKST 
version 3.20 til anmeldelse. Syste- 
met modtages i en bibliotekskas- 
sette med en systemdiskette og en 
diskette med demonstrationsdata. 
Pa denne datadiskette er der eks- 
empler pa de fleste af systernets 
funktioner. Ud over disketterne be- 
star systemet af en bruger manual 
pa 300 sider i A5-format. Desuden 
er der en mindre reference-manual, 
der giver en msget kort beskrivelse 
af alle kommandoer og funktioner i 
DANTEKST. 

Brugermanualen er i fem dele. 
Den forste del handler om, hvordan 
man starter op, loader, og laver en 
backup af programmet, indskriver 
en tekst og afslutter. Resten af vej- 
ledningen omfatter til dels tekstbe- 
handlingens forskellige funktioner, 
men en af de sidste dele behandler 
del kartoteksprogram, der ogsA er 
indbefattet i DANTEKST. 

Programdisketten indeholder to 
»boot« programmer, et der giver 
mulighed for at vajlge skaarmfarve. 

Nar DANTEKST er loaded, kom- 
mer den forste menu frem, fra hvil- 
ken man kan vaelge fem forskellige 
dele af programpakken. Den forste 
og hovedprogrammet er selve 
tekstbehandlingsprogrammet. De 
andre muligheder er kartotekspro- 
gram, dokument sortering, bag- 
grund for forskellige systempara- 
metre, f.eks. valg af printer og 
»overgang til fremmed program-', 



hvilket giver mulighed for at forlade 
DANTEKST og ga direkte til et an- 
det program uden at det er nodven- 
digt, at returnere til DOS. 

Hvis man vaelger tekstbehand- 
lingsrnuligheden fra menuen, kom- 
mer hovedtekst displayet frem. 
Dette viser en skaerm, hvor man 
overst ser en status lin]e, indehol- 
dende sidenummer, linje og num- 
mer for cursorens placering. Denne 
linje viser ogsa, om den type af 
tekst man skriver, er -indsaat" eller 
-overskriv". Under denne linje er 
der en blank linje der, nar den bliver 
aktiveret, viser de muligheder, der 
findes i de enkelte menuer. Den fol- 
gende linje erforrnatlinjen, der viser 
hojre og venstre margen, samt ta- 
bulatorstoppene. Der er nu 20 linjer 
tilbage til tekst. Kanten af tekstom- 
radet er markeret med en rnassiv 
lodret linje. hvor teksten er skrevet, 
og en verttkal linje af *, hvor der 
endnu ikke er tekst. DANTEKST, er 
hvad man i USA og England kalder 
"WYSIWYG- tekstbehandling. Det 
vil sige, at det bliver printet ud noj- 
agtig, som det star pa skaarmen. 

Menuerne aktiveres ved at bruge 
funktionstasterne. Hver tast giver 
mulighed for forskellig menu, og 
hver kan indeholde op til otte kom- 
mandoer. De forskellige menu- 
funktioner er vist nedenfor; 




F1 Til/fra skrifttype, tabulator 
F2 Rediger margen, afsnit osv. 
F3 Indsast linje, ny side m.v. 



F4 Slet linje, spalte m.v. 

F5 Unje flyt. kopier 

F6 Blok marker, slet, irtdsset 

F7 Regner forskellige regnefunktio- 

ner 

F8 Kombiner ■ bruges til at kombi- 
nere breve m.v. 

F9 Sog forskellige sogningsfunktio- 
ner 

F10 Menuer - dokument, tabulator, 
piloter 

Tekstbehandlingsdelen indehol- 
der ogsS de funktioner, der findes t 
de fleste tekstbehandlingssystemer 
i forbindelse med indsaat og slet 
tekst. Dette vaere sig enkelte ord, 
linjer eller hele afsnit. En fuldstsen- 
dig »blok-funktioner« er ogsa inde- 
holdt i programmet, denne kan bru- 
ges til at flytte dele af et dokument 
fra et sted til et andet. 

En anden egenskab ved tekstbe- 
handlingsprogrammet. som jeg 
personlig godt kan lide, er pilotfunk- 
tionen. Her er det rnuligt at definere 
en serie af »standard-sa3tninger«. 
Der kan vaere op til 125 i pilotbiblio- 
teket. Disse kan aktiveres ved at 
bruge F10 tasten og valge »udfor 
pilot—funktionen. Disse standard 
tekster kan indflettes i brugerens 
normal tekst ved at fremkalde pilot 
eller bogstav. 

Dokumenterne saves pa en do- 
Kumentdiskette i B-drlve. Ved at 
bruge dokument kommandoen, der 
er i F10-menuen, kan man f& et ka- 
talog over de dokumenter, der er pa\ 
disketten, vist pa skasrmen uden at 
bringe uorden i det dokument, man 
arbejder med. Denne dokument 
vejviser viser dokumentets navn, 
datoen og klokkeslettet for doku- 
mentets oprettelse og hvornSr det 
sidst er ajourfort. Isser den sidste 
facilitet er rneget nyttig for mange, 
der bruger DANTEKST i det daglige 
arbejde. 

Programmet indeholder ogsa en 
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omtattende msengde printer funkti- 
oner. I den version, som RUN har 
modtaget, var der mindsi seks stan- 
dard-saet i programmet. Disse in- 
kluderer populasre matrix printere 
som Okimikro, skonskriftprintere 
som JUKI 6100 og ogsa en for HP 
Think Jet. Desuden er der mulighe- 
der for al definere brugerens egne 
printer parametre. Dette er let gjort 
og kan saves pa en system-di- 
skette. 

DANTEKSThar, ligesom de nyeste 
tekstbehandlingssystemer den fa- 
cilitet, at man har automatisk under- 
stregning og fedskrrft. Desuden gi- 
ver dette program brugeren mulig- 
hed for at skrive en halv linje op eller 
ned, dette kan vaere nyttigt ved 
skrivning af kemiske formler osv, 
Der kan ogsa skrives I negativ. 

En af DANTEKST's facilileter, 
som man ikke normalt ser i tekstbe- 
handlingssystemer, er muligheden 
for at skrive i spalter. Bredden og 
antal af spalter bestemmes af bru- 
geren, og den eneste betingelse er, 
at de ma vagre indenfor de 125 po- 




sitioner, der totalt er pa en linje. For 
at bestemme antal af spalter og 
bredden af disse bruges tabulato- 
ren. 

DANTEKST giver ret avancerede 
tabulator-faciliteter. Disse inklude- 
rer bl.a. muligheden for at gemme 
de tabulator stop, man har brugt, i 
et tabulatorbibliotek. Der er to for- 
dele ved dette. For det forste er det 
let at gemme alle tidligere define- 
rede tabulatorstop. For det andet er 
det let at skifte fra en tabulator-form 
til en anden midt i et dokument. 

Der sy nes dog at vsere en ulem pe 
ved DANTEKST's formattering- og 
tabulator funktioner. Det er, hvis 
man har defineret den venstre og 
hojre margen og skrevet noget af 
teksten, Hvis del sa er npdvendigt 
at sendre margen og flytte venstre 
og hojre margen mod hinanden, vil 
den tidligere tekst ikke automatisk 
f5 den nye margen. Sa vidt jeg ved. 
er DTI Software opmaarksom pa 
dette problem, og det vil forhabent- 
lig vaere lost i naest udgave af DAN- 
TEKST. 

DANTEKSTindeholder ogsa auto- 
matisk orddelingsfunktion, der de- 
ter ordene efter de danske retskriv- 
ningsregler. dvs ud fra fastlagte 
regler om sammensaetning af voka- 
ler og konsonanter. Det er bagefter 
muligt at soge efter delte ord, sa 
man kan checke. om de er delt kor- 
rekt. Det er naturligvis muligt at sla 
denne funktion fra. 

I DANTEKST er ogsa inkluderet 




et kartoteksprogram. Dette pro- 
gram er ideelt til at rumme oplysnin- 
ger om navne, adresser, teiefon- 
numre og mange andre informatio- 
ner, f.eks. kundeoplysninger Disse 
kan igen bruges sammen med 
tekstbehandlingsdelen, hvor man 
kan flette de oplysninger ind i breve. 
Et eksempel pa dette er givet pa 
demo-disketten. Der kan vaere op til 
3000 dokumenter i hvert kartotek. 
og hvert dokument kan indeholde 
op til 64 felter eller ialt 1024 tegn. 
Opbygningen af formatet bliver sty- 
ret af en menu, og bliver pa samme 
tid formatteret pa skaermen. Efter 
opbygningen kan indgangene ind- 
tastes. Det er ogsa mutlgt at so rtere 
kartoteket. ligesom det er muligt at 
vaalge specielle dokumenter ud fra 
specielle kriterier, der er defineret i 
kartoteket. overfore disse til tekst- 
behandlingsdelen og bruge disse til 
udskrift af breve. 

DTI Software har gjort DAN- 
TEKST til en meget brugervenlig 
programpakke. Der er brugt en 
avanceret menu-teknik. Det er mu- 
ligt at flytte rundt i menuen ved 
hjaelp af enten »pile-tasterne«, mel- 
lemrumstangenten eller hvor en 
funktion eller kommando kan vael- 
ges dtrekte ved at bruge forste bog- 
stav af kommandoordet. der er 
brugt i menuen. 

Det star helt klart, at DANTEKST 
er et godt planlagt og udmaerket 
program. Med undtagelse af den for 
naavnte kritik omkring reformatte- 
ringen af teksten, er der ikke meget 
andet at kritisere dette program for. 
Blok-funktionen kan vaare lidt tung 
at arbejde med, skiftet mellem me- 
nuerne - isaar nar man arbejder med 
dokument-menuen, kan vasre lidt 
langsom. Nar alt komrner til alt. ma 
det fastslas, at DANTEKST er som 
det danske landshold: En sikker 
vinder pa det danske marked. ■ 
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af Jorgen Jorgensen 

Tingene kan ikke ga steerkt nok! VI 
klager over den slove diskettesta- 
tion, den endnu slovere kassette- 
Station og BASIC-programmernes 
langsommelige afvikllng. 

De hurtigste programmer skrrves 
i maskinkode - ingen Ivivl om det! 
Dette er et »primitivt« programme- 
ringssprog, og jo mere avanceret el 
sprog er. des mere langsornt arbej- 
derdet normali. BASIC er el sakaldt 
»hojniveau» sprog, der arbejder re- 
lativt langsomt, fordi hver enkefl 
kommando forst skal "Oversa3ttes« 
til et lille maskinkodeprogram. En 
compiler er et program, der omskri- 
ver et - i dette tilfaelde - BASIC-pro- 
gram til programmeringssprog. 
som computeren kan udfore megel 
hurtigere. 

PETSPEED 

Dette er Commodore »-egen» com- 
piler. Den er beskrevet i RUN nr. 2 
1984. og ingen af de compilere, jeg 
har set til dato, kan overga den, 



hvad hastighed angar. Derimod har 
den nogle ulemper, der bevirker, at 
den nu og da er ltd* besvaarlig at 
arbejde med. 

Programmer pa omkring 70 
blokke og derover giver hurtigt pro- 
blemer. hvis man kun har en disket- 
lestation og desuden -gar den ned» 
med et brag, hver gang den stoder 
pa en fejl i programme!. 

BASIC 64 

DATA BECKER har lavet denne 
compiler, der er vassentlig mere 
fleksibel end Petspeed. Hardu lavet 
noget '»mog'< far du vist al!e dine fejl 
i en gennemkorsel og kan rette dem 
pa en gang. Du kan compile dit pro- 
gram pa tre forskellige m&der (deci- 
maltal. heltal og maskinkode) - ja 
endog kombinere disse metoder 
Du kan arbejde med "udvidelser» 
som f.eks. Simons Basic 

Lad nu veere med at koge over af 
begeistring, tor der er kun lale om 
en -accept" af f.eks. de dejlige gra- 
fikkommandoer i Simons Basic - de 
korer ikke hurtigere. Den med ma- 



skinkoden skal ogsa tages med et 
vist forbehold, da programmet bli- 
ver omskrevet, men ikke omstruk- 
tureret lil maskinkode. Det fylder 
meget i forhold til og korer ikke sa\ 
hurtigt som et »rigtigt« maskinko- 
deprogram. 

BASIC 64 korer kun pa en disket- 
testation og har alligevel Ikke de 
samm© »pladsproblemer» som Pet- 
speed. 

Med lidt mere arbejde kan BASIC 
64 kore nassten lige sa hurtigt som 
Petspeed, og det rummer flere faci- 
liteter. Skulle (eg vaelge en compiler 
under juletrseet, tror [eg, jeg ville 
vaalge BASIC 64, med mindre ha- 
stigheden er alt afgorende. 

Begge koster omkring 500 kro- 
ner. 

Der findes and re compilere til 
C64, som f.eks. Austro og Basic- 
Aid, men disse kan jeg ikke anbe- 
fale. 

Austro er dog lige kommet med 
en ny lil C128 (pris kr. 1.375.00) - 
den ser interessant ud, men mere 
om den I nseste nummer. ■ 



SIEL MK 49 keyboard 

Vejledende udsalgspris kr. 1 995,00 

(inklusiv startpakke pa bade band og diskette) 



'mimmmum 



til Commodore 64 
Commodore SX 64 
Commodore 128 



Har du en af disse computers 
Kan du spille keyboard, eller 
har du lyst til at lasre det? 



Med et SIEL keyboard har du muligheden for at spille "prof" uden at skulle investere flere tusinde 
kroner. 

Udnyt lydchippen (beskrevet i RUN nr. 7, 8 og 9) pa en "prof" m&de. 
Der er mulighed for yderligere udbygning af musikanlasgget. 

Henvisning til nsermeste forhandler fas hos Randers Musikimport ApS, tlf. 06-41 11 88. 
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En billig printer 
kan fuldstaendigt 



■ j 
m 

• 




vigtige 
lokumenter 



V/ELG EPSON 



Epson producerer mere 
end halvdelen af alle printere i 
verden. 

Dennesuveraene position 
eropnaet, fordi brugerne 
ved, at Epson laver de mesc 
palidelige printere pi 
markedet. 

Palideligheden skyldes 
omhu lige fra den gennem- 
cenkte konstruktion til 
leveringen. Ved ankomsten 
hertil kontrolleres samtlige 
produkter, ogderfor har Epson 
printere en reklamations- 
procent pica. 0. 

Epson's program da?kker 
ethvert behov og opfylder 
alle krav til en palidelig profes- 
sionel printer. 

FX-, LX-ellerRX- 
serien cilfredsstiller de fleste 
behov. Epson har prtnteren, 
der er skabt tiJ opgaven, og du 





har sikkerhed for, at dine 
dokumenter bliver pa?ne og 
tydelige. Du fir et stort udvalg 
af skrifttyper, og udskrivningen 
sker ved hcj hascighed. 

P80 er Epson's gemale 
losningpaen bserbar printer cil 
AA - papir. Brug den sammen 
med Epson '5 bzerbare PC'er og 
lav fakturaer og ordrebekra?f- 
celser p3 stedet. 

Epson LQ-1500er den 
professionelle Dot-Matrix 
printer, der kan det hele. Med 
200 bogscaver i sekundet 
skriver den et dokument med 
den hojesteoplo-sningsgrad, 
teknologien kan przestere. 

SQ-2000 er Epson's nye 
flagskib. Den er fuldsta?ndig 
lydlos, og med over 100 forskel- 
lige skrifttyper og storrelser 
overgar den alt, hvad printer- 
markedet kan tilbyde. 



EPSON 



T. O. Data AJS, Ballerup Byvej 222, 2750 Ballerup 
Tlf. 02-65 52 00 
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af Robin Sagar K^m 




Som jeg lovede i forrige nummer af 
RUN, vil ]eg anmelde de sidste spil 
fra Melbourne House. TERRORMO- 
LINOS saml THE FOURTH PROTO- 
COL, et spil baseret p5 Frederick 
Forsyths bestseller. Forsl vil jeg 
imidlertid bringe gode nyheder til 
alle dem. der holder af INFOCOM 
adventures. 

Examine 

fNFOCOM er sikkert det bedst 
hendte af »ren tekst* firmaerne, De 
er netop kommet med et helt nyt 
adventure, der hedder WISHBRIN- 
GER, Sa vidt jeg er orienteret, er 
dette spil endnu ikke kommet til 
Danmark. 

HandHngen udspiiler sig i en lille 
amerikansk by, der hedder Feste- 
ron. Du er et postbud, der er blevet 
sendt af din chef Mr. Crisp for at 
aflevere et brev til ejeren af Ye Olde 
Magick Shoppe. For at komme der- 
til er det nodvendigt at gk over kir- 
keg&rden, og det er naturiigvis ikke 
sserlig rart. Hvis du finder vej til for- 
retningen, bliver du her modt af en 
gammel kone. Hun beder dig om at 
laese brevet for hende. Du finder 
ogsa. snart ud af, at ikke alt er, som 



det ser ud til at vasre i denne sov- 
nige by. Du tager sa af sted for at 
finde »den onde«, der harkidnappet 
den gamle kones katte. Hvern ved, 
hvad morket vil bringe? Hvorfor ser 
byen sa forskellig ud i tusmorke og 
i t5ge? Du er snart inde i den magi- 
ske verden, nogSe af delene kan 
man genkende fra ZORK-spillene. 
Jeg har endnu ikke modtaget WlSH- 
BRINGER til anmeldelse, men nar 
jeg gear dette, vil jeg skrive mere 
detaljeret om dette spil. 

Det er ikke alle disse spil, der nar 
frem til forretningerne, det er p5 
grund af de hsje priser. Spillene 
kommer fra USA, og for de nar for- 
retningerne. er prisen oppe pa om- 
kring 500-600 kroner. INFOCOM 
spillene er til mange .forskellige 
computere incl. Commodore PC 10 
og 20. INFOCOM har en agent her 
i Danmark. S.P. Software i Koben- 



havn og telefonnummeret er (01) 67 
33 33. 

THE FOURTH PROTOCOL var en 
bestseller spionroman i 1984. Histo- 
rien er den kendte. Kommunisterne 
vil tage magten i England. Ideen er, 
at KGB vil smugle en atombombe 
Ind i landet inden valget i 1987. Ved 
at lade den eksplodere tset ved en 
amerikansk flyvestation, haber KGB 
pa, at man vil bebrejde USA den 
»ulykke«, der er sket og dermed er- 
statte den siddende regering med 
en kommunist-venlig. Denne rege- 
ring skal sorge for, at England kom- 
mer ud af NATO, og med dette 
skndt bryde NATO-alliancen. 

Hovedpersonen i bogen og der- 
for ogsa i spillet er John Preston - 
en MI5 agent, der bestraaber sig for 
at fange de kommunistiske agenter 
og til sidst demontere bomben. 

Spillet er i tre dele. For at komme 
til tredje del, m& man have kodeord 
fra de forste to dele. De fsrste to 
dele er NATO-documents og The 
Bomb, der er med billeder. Dette 
betyder, at spillet kraever joystick, 
men ikke at det er reaktion og hur- 
tighed, det kommer an pa. Joy- 
sticket bliver brugt til at fiytte en 
finger/hand figur rundt pa skaarmen 
og pege pa billedet af den ting, man 
onsker at bruge. I den forste del af 
spillet skal man opklare, hvern der 
har stjalet NATO-dokumenterne. 
For at gore dette, skal man bruge 
sin telefon, computer og sorge for 
at skygge folk. Det er vigtigt. at man 
pS dette tidspunkt har en god »sta- 
tus«, da dette vil hjeelpe senere i 
spillet. Man kan save eller »fryse« 
spillet, sa det ikke er nodvendigt at 
fuldfore det pa en gang. 
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I nseste del skal man finde bom- 
ben. Del er som for omtalt ogsa et 
spll med billeder, der giver dig mu- 
lighed for at komme omkring i Lon- 
don, hvor du kan undersoge ting og 
ga fra sted til sted. Du kan risikere 
at blive draBbt af terrorister eller 
blive kort over af en London-bus. 
Desuden kan jernbanearbejderne 
ga i strejke. sa det er vigtigt. at 
vaslge det rette transportmiddel pa 
det rigtige tidspunkt. 

Den tredje del. The SAS Assault, 
kan jeg ikke beskrive. da jeg Ikke er 
kommet sa langt, men maske i nae- 
ste nummer. SS vidt jeg ved, er 
dette mere som et adventure med 
de kendte kommandoer. men ogsa 
her skal joysticket bruges og efter 
sigende skal reaktionerne i denne 
del ikke vaere for langsomme. 

The FOURTH PROTOCOL er et 
meget godt spil. Ikke kun pa grund 
af fortaellingen. men ogsa grafikken 
og mulighederne for at operere, Jeg 
tror. at denne type spil vil blive mere 
og mere populeere hos adventure- 
spillerne. En del af sprogproble- 
merne, som danske adventure-spil- 
lere har haft - da der kraaves et rime- 
ligt stort ordforrad for at fuldfore et 
spil - kan gores mindre ved denne 
type spil. 

Sa til Melbourne House's nye spil 
TERRORMOLINOS. Alene navnet 



RUNs hjaalpeservice er aben igen. 
Vi har modtaget breve fra bl.a. 
Troels Dam'borg, som har proble- 
mer med at komme gennem den 
lodrette tunnel i -Sorcery" - et spil 
fra Virgin Games. Svaret er: 

-I slottet tager du sveerdet. Du 
gar gennem den nederste dor. byt- 
ter svserdet med guldet, og gar til- 
bage igen. Du gar nu gennem den 
overste dor. og bytter guldet med 
noglen. Derefter igen gennem den 
nederste dor. hvor du bytter noglen 
med svasrdet, slar munken ihjel, ta- 
ger noglen, og gar ud til havet. Med 



giver visse associationer til en by i 
Spanien med naesten samme navn. 
Det er en familie pa fire personer. 
der skal pa en charterrejse med 
Kwikhol Tours, men for at komme af 
sted, mS man finde bl.a, pas, billet-, 
ter osv. 

Som hos alle familler, der skal af 
sted pa ferte, er ogsS. denne familie 
i absolut stdste ojeblik. Taxaen ven- 
ter udenfor efter kun fa traek, hvis 
man ikke nar den, er det bare aer- 
gerligt. Pengene er spildt. 

Endelig af sted. man nar hotellet 
og bllver indkvarteret. Huskede du 
forresten dit kamera? Det er et ret 
vigtigt instrument til at bevise, at du 
har vaeret pa ferie. Du skal nemlig 
tage ti typtske «feriefotografier«. Fil- 
men indeholder kun tolv billeder, sa 
der er ikke plads til mange fejltagel- 
ser. 

Som pa en rigtig rejse, er der 
ogsa her mulighed for udflugter. 
Man kan komme til tyrefaegtning, 
vinsmagning og besoge et gammelt 
kloster Man kan ogsa ga til stran- 
den (pas pa solen), eller om aftenen 
gS til danseopvisning. Dette er en 
charterrejse. nar den er vasrst. Der 
er ikke det. den lille familie Ikke 
komrner ud for. 

I modssetning til Hamstead, der 
er lavet af de samme personer som 
har lavet TERRORMOLINOS, er 



denne nogle kan du komme gen- 
nem den lodrette tunnel*. 

En anden af RUNs laesere har 
problemer med et spil for VIC-20. 
Det er Ulrik Christensen fra Hader- 
slev. Ulrik vil gerne have hjaslp til et 
spil. der hedder -Voodoo Castle- 
fra Adventure 4. Desvaerre Ulrik, 
kan (eg ikke hjaelpe dig. da jeg ikke 
kender dette spil. Maske er der 
nogle af laeserne. der har nogle tips 
til dette eller andre spil, som de me- 
ner, at RUNs laesere kan have 
glaede af. Send dem til mig, og jeg 
vil formidle dem videre her i bladet. 

Mine egne tips er til to 1NFOCOM 
spil, ZORK 1 og Planetfall. 

ZORK 1 

Husk at tomme resevoiret. Tryk pa 
alle knapperne undtagen den bla, sS 
kan du abne skjulet og dreje bolten 
med skruenoglen. 

For at fS ptatinbarren i Loud 
Room, skriv -echo-, nar du gar ind 
i det. 




dette ikke et rent tekstspil. Nar man 
»dor<\ kommer der et billede pA 
skaermen, der viser Srsagen til, at 
du ma begynde forfra. 

Hvis du har taget et fotografi, og 
det er et »rigtigt« feriefoto, vil dette 
ogs& komme frem. 

Det er et sjovt spil. der tager gas 
p4 rejsebranchen. Man kan sikkert 
genkende lidt af det, der sker for 
denne lille familie. Pas forresten pa 
Doreen - hun har en vis evne til at 
blive vsek. 

Rigtig god rejse!!! 



Ved at rore ved spejlet kan du 
asndre retning - at knuse det kan 
aandre dit liv. 

PLANETFALL 

Hvis du hele tiden dor af suit, sa fa 
fat i noget mad. Du har brug for 
magneten (curved metal bar), en 
lille nogle fra en revne og et »acess 
card- - men hold dette vsek fra mag- 
neten. 

Glem ikke at tage GFLOYD med, 
lige meget hvor du gar hen. Prov at 
»Play with Floyd», hvis du vil se no- 
get sjovt. 

Laseren behover nye batterier, 
og microben kan tide varmen fra la- 
seren, nSr du har odelagt -lump of 
dust». smid laseren og lob for dit liv. 

Punktum 

Dette er alt for denne gang, Lad as 
se, hvad |ulen vil bringe. Jeg vil tage 
en tur til England, hvor jeg haber pa, 
at tage nogle helt nye og spaen- 
dende spil med hjem igen. 
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► forsal fra side 11 

bjerge. Desuden er stedet kendtfor 
sit gode vejr. 

■'Denver-, Colorado er lidt svas- 
rere. Der er bjerge og til tider 8t 
frygteligt vejr! Desuden er der en 
he! del "transit- flyvninger. 

"Dallas-Forth Worths. Texas her 
er 2 lufthavne. den international 
lufthavn, og den mindre lufthavn 
Dallas Love Field. Fra den sidsl 
naevnte kommer der hele tiden 
disse langsornrne og irriterende pri- 
vate flyvemaskiner. Det er sveert at 
fa passet disse ind i den meget hur- 
tige Internationale lufttrafik. Heldig- 
vis er der ingen bjerge, og vejret er 
altid godt. 

I "Washington D.C « er der 2 luft- 
havne: Dulles International, og Was- 
hington National. Lufttrafikken be- 
star af 3 typer: 

Supersonic Concorder.alm. Jets 
og de langsomrne private maskiner. 
VaBlg ikke denne svaerhedsgrad 
med mindre du er frisk og udhvilet! 
Hvis du far dirigeret nogle af maski- 
nerne ind over det HVIDE HUS, bit- 
ver de skudt ned!! 

-NEW YORK-, her findes ogsa 2 
lufthavne: John F. Kennedy Interna- 
tional og La Guardia International. 
Her er en kolossal trafiktaethed til 
begge lufthavne, desuden er der en 
masse -transit" trafik. som skal 
gennem omradet. Kan du klare 
denne her, synes jeg, du skulle 
soge ud i Kastrup lufthavn, du har 
helt sikkert anlaeg for jobbet. 

Grafikken er ikke noget at rabe 
hurra for, men den opfylder de be- 
hov. du har, for at orientere dig. Du 
kan se maskinerne og lufthavnen. 
Hvis der er forhindringer, er disse 
ogsa synlige. Det samme er de nor- 
male trafikruter og radiofyrene. Gar 
det for hedt til, har du mulighed for, 
at fa maskinerne til at cirkle over 
rad iofyrene . 

Noget af det bedste ved spillet er 
dets brug af "Speech Generator-. 
Nar du udpeger en maskine. entern 
med Joystick, eller Keyboard, kan 



du dirigere maskiner op eller ned, 
hojre eller venstre. Nar du slipper 
knappen, vil computeren «sige« 
dine kommandoer til piloterne.Rig- 
tig sige, sa man kan forsta det! Pilo- 
terne svarer selvfolgelig ogsa med 
et "Roger"! Hvis du ikke kan huske, 
hvilke ordre du har givet en bestemt 
maskine. kan du udpege maskinen, 
og bede om at fa kurs, hojde og 
intensioner opgivet. 

Konklusion 

Dette spil taber du ikke interressen 
for lige med det samme. Det kan 
tages frem igen og igen. Jeg vil an- 
befale det meget. og ser frem til nye 
spil fra samme firma. 



Titel: KENNEDY APPROACH 
Computer: CBM 64/128 
Medium/pris;band 248,- disk 

298.- Betjening Tastatur/Joystick 
Fabrikat: Micro Prose Software 
Impotor Twilight tlf. 01-880734 
Quicksort ApS. tlf. 01-241233 an- 

viser nasrmeste forhandler. 



Win mening (1 - 13) 

Computer brug: 10 
Manual: 8 
Betjening: 11 
Vedvarende appel: 11 
Helhed: 10 



SUMMER GAMES II 

Som navnet pa spillet kraftigt an- 
tyder, er dette efterfolgeren til 
SUMMER GAMES. Det kan vaere 
svasrt at folge en succes op, men 
det er lykkes ret godt i dette til— 
faslde. Som det var tilfseldet med 
f orgaengeren, er grafikken helt i top. 

De nye discipliner er: 

Trespring, roning, enerkakak, 
spydkast, hGjdespring, fasgtning, 
cykel sprint og ridebane springning. 

Der er en meget flot afslutning- 
sceremoni. nar spillet sluttes, se 
den selv! 

Hvis du er t besiddelse af det for- 
ste SUMMER GAMES, har du mu- 
lighed for ogsa at bruge alle discipli- 
nerne fra dette spil nar du har loadet 
SUMMER GAMES II. 

Der er ingen grund til at bruge 
spalteplads pa at fortaBlle, hvor godt 
spillet er. Har du provet den forste 
SUMMER GAMES, ved du, hvor 
godt spillet er. 



Kender du slet ikke noget til 
SUMMER GAMES, vil jeg foresla, at 
du besoger din software forhandler 
hurtigst muligt. 

Titel: SUMMER GAMES II 
Computer:CBM 64, 128 
Medium/pris:band 178,- disk 

24fl.- 

Betjening: Joystick 

Firma: Epyx Computer Software 

Impotor: Quicksort ApS telf. 01 - 

241233 



Min mening (1-13) 

Computerbrug: 11 
Manual: 13 
Betjening: 11 
Vedvarende appel: 10 
Helhed; 12 
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Printer huanMin 



af Jorgen Jorgensen 



Flere og flere 64/128-ejere har 
adgang til andre printere end 
Commodores egne. Problemet 
med tllslutnlngen af disse printere 
er som regel kun at finde et egnet 
Interface, der Kan skabe den for- 
nodne kontakt. 

Det mest almindelige er at eta- 
btere forbindelsen via brugerpor- 
ten, men fra MCH Data i Haderslev 
har vi modtaget et parallel interface 
med en 16K buffer, der forbindes 
via den serielle indgang og kasset- 
teporten. 

Vi har her pa redaktionen teste! 
det (ante interface pa en Commo- 
dore 64 og en JUKI 6100 typehjuls- 
printer. Det er problemlost at for- 
binde de enkelte enheder, bortset 




fra. at stikket til kassetteporten er af 
en darlig kvalitet. Det sad meget og 
forbindelsen svipsede nemt. Til 
mere permanent brug vil systemet 
dog nasppe volde problemer, da det 
kun er en enkelt ledning, der skal 
forbindes. og det kan enhver gore. 

Systemet behover ikke noget 
software og printeren fungerer 
prascis som enhver anden printer 
med device nr. 4. 

Tekstbehandlingssystemerne 
kan godt give lidt problemer. Easy 
Script byttede om pa store og sma 
bogstaver. hvorimod min gamie tro- 
faste Speedscript fungerede upa- 
klageligt. 



Det er i det hele taget et generelt 
problem, nar man arbejder med for- 
skellige fabrikater. Man skal sikre 
sig, at systemerne kan kore sam- 
men og om de evt: let kan rettes. I 
tilfaeldet med Speedscript sKulle 
det ikke vaere noget problem. 

Der er en lille pause, nar bufferen 
indlaaser en ny fil. Desvasrre kan 
den ikke kore sammen med Speed- 
dos. og ser man bort fra kassette- 
stikket, fungerede det testede inte- 
face upaklageligt. 

Forhandler: MCH-DATA ApS, 
Mollepladsen 3, 6100 Haderslev. 
Telf. (04) 53 17 71. 

Pris: kr. 1.104,00 




Terrninalbord model TB 81 
med sideplade 



Skrivemaskinebord 




Terrninalbord model TB 35 



Terminalarbejdsplads 
TB81 med 2x90° vankler 
+ sideborde 80 x 80 cm. 



ERMI design ApS 

Fabrik for stalmobler - mobelstel efter opgave 

Bygaden 60 . 4736 Karrebaaksminde . Tlf. 03-74 2930 
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COMAL SKOLE 4 

► fortsat fra side 12 




skal vaere storre end nul (0 bruges 
jo som stopvaerdi), nar den betin- 
gelse er opfyldt sker udregning og 
udskrivning. Den naeste WHILE 
lokke bruges til at sorge for, at der 
altid er plads pa skaarmen, det sker 
med variablen p # , der bruges til at 
holde rede pa, hvor mange skserm- 
linjer. der er brugt. Startvasrdien i 




BEGYNDERSIDEM 



^ fortsat fra side 23 



taeller bagJaans. Nu dukkede der en 
ny kornmando op igen. STEP (trin) 
far computeren til at taalle med et 
andet interval. Prov at udskifte -1 i 
linje 10 til -.5 og tast RUN. Der skulle 
nu vasre en forskel pa 0.5 mellem 
tallene. STEP kan naturligvis ogsa 
vssre en positiv vaardi, hvis vi taaller 
fremad. 

FOR TO NEXT kan altsa bruges 
til at gennemga den samme rutine 
flere gange, Det kunne f.eks. vasre 
at hente nogle navne ind i program- 
met. Tast NEW. 



10 INPUT'HVOR MANGE NAVNE 
0NSKES";Y 

15 REM Her starter forste lokke 
20 FOR X = 1 TO Y 
30 INPUT'HVSLKET NAVN";NA$(X) 
40 NEXT X 

45 REM Her starter nasste lokke 
50 FOR X = 1 TO Y 
60 PRINT NAS(X) ' 
70 NEXT X 



A er en DECIMAL VARIABEL 
(det vender vi tilbage til senere) og 
vi kan derfor kun benytte den til ta!. 
I linje 34 star selve »hent et tegn- 
kommandoen. I linjerne 36-42 defi- 
nere vi. hvad der skal ske ; hvis vaar- 
dien af A har en bestemt storrelse. 
Linje 46 er en slags nodbremse, 
hvis linjen ikke var der, villa pro- 



pa er 3 for at beskytte overskriften , 
slutvaerdien er 22 for at forhindre at 
(ndtastningslinjen bliver overskre- 
vet af programmet. Nar indholdet i 
ptt er 22, flyttes cursor op i linje 3. 
derefter udtores indholdet i FOR 
Jokken. FOR lokken bruger system- 
funktionen SPCS til at skrive blanke 
legn det antal gange, der er angivet 
i parentesen, og det sker 18 gange. 
Den visker altsa 19 linjer ud, deref- 
ter flyttes cursor igen op i linje 3 
(ptt =3), og det hele starter fortra, 
undtagen for den variabel (t), der 
indeholder totalen - den beholder 
sin vserdi, sa du kan taalle flere 
sksermbiileder sammen, blot ma 
sluttallet Ikke vaere storre end antal- 



let af hash-tegn ( # ) i PRINT USING. 
Hvis der ikke er plads til totalen i 
PRINT USING, sa far du kun *** 
som udskrift. 

I proceduren »streg« har jeg 
brugt CBM-tast/t til at lave stregen. 
I proceduren »<pause« har jeg brugt 
en anden made at skrive CHR$(0) 
og »0» giver samme resultat. 

Prov at saBtte en anden type 
lokke ind i programmet. Du kan 
bruge dem alie. blot du husker at fa 
betingelserne ind pa de rigtige ste- 
der. Du skal ikke fortvivle, hvis det 
ikke lykkes forste gang - prov igen 
og igen, da naesten alle laerer mest 
af egne fejl. 

Rigtig god fornojelse. 



grammet ikke stoppe op, hvis den 
indtastede vaerdi var forkert. 

Flyt cursoren op i linje 46 lige 
bagefter linjenumrneret, hold SHIFT 
nedtrykket, og tast INST/DEL 3 
gange. Nu skulle hele linjen flytte 
sig 3 pladser til hojre, skriv nu REM 
< return >. Prov sa at starte pro- 
grammet. De eneste tal du rkke ma 
indtaste nu r er tallene fra 1-4. 

Programmet skal nu begynde 
med, at du skal indstiller det indbyg- 
gede ur, selvom du ikke har vaigt, at 
det er det, du vil. Fjern REM fra linje 
46 igen. Omskrevet til dansk star 
der i linje 46: 

Hvis A er mindre end 1 , eller A er 
storre end 4, sa ga til linje 34 og 
hent et nyt tegn. 

INPUT 

Input bruges ogsa til at indhente 
oplysninger til programmet. Det kan 
vcere bade tal Og bogstaver. afhasn- 
gig af, hvad man har bestemt sig 
for. Forskellen kommer vi ind pa se- 
nere i afsnittet om VARIABLER. 

Wed INPUT kan man kaade en 
tekst sammen med sporgsmalet. 
Cursoren vil heller rkke her komme 
til syne, men erstattes med et ?, 
computeren viser dig altsa, at den 
afventer et svar (input). I den tekst, 
der kan haagtes pa INPUT komman- 
doen virker CURSOR tegnene gan- 
ske som i en PRINT ssetning. Du 
kan altsa bestemme, hvor pa skaar- 
men computeren skal stille sporgs- 
malet. 

Prov at se linje 74 i demo pro- 
grammet. Her stiver computeren 
sporgsmalet »hvad er klokken-. 
Programmet vil blive staende i 
denne linje, Indtil den har modtaget 



et svar, far den et forkert svar, vil 
programmet blive afbrudt, og en 
fejlmeddelse blive udskrevet pa 
skserrnen. Denne afbrydelse kan 
man gardere sig imod ved hjaslp af 
nogle IF. .THEN saetninger. Mere om 
dette i et senere nummer. 

Ved forste ojekast ser det ud 
som om, det er den samme variabel. 
man hver gang anvender til navnet. 
X'et i parentesen sendrer sig hver 
gang, og giver saledes forskellen. 
Hvis du havde bestemt dig for 4 
navne, vil de fire variabler vaere fol- 
gende: 



IMASID. NA${2), NA${3) og NA$(4) 



I linje 10 bestemmes antallet af 
navne, og dette antal laegges i reol- 
rummet maerket Y. Linje 20 bruges 
til tasller, og her skal der tallies, til 
vaerdien af Y er naet. Linje 30 siger 
sig selv. og i linje 40 bliver X en 
storre for hver gang. 

Du kan forresten ikke bede om 
mere end 10 navne. Det har noget 
DIM {dimensionering af variabler) at 
gore - men mere om det naeste 
gang. 

Naeste gang vil vi uddybe variab- 
ler og FOR TO NEXT, samt kikke pa 
DIM, ON... samt IF. ..THEN. 

Sporgsmal og ideer modtages sta- 
dig gerne. Adressen er: 

RUN Commodore-World 

Torvegade 52 

1400 Kobenhavn K 

Maerk kuverten »Begynderstden« 
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Demo »Begyndersiden« 



1 a rep 

12 REP > > 

11 REP * PENU * 
16 REP * * 

18 sen >r*>>*>*»**x*>x****X> 

20 : 

22 PRINT'CCLRJ'; 

21 PR1NTIPBC12S3*' 1. ST]L INO0YGGET UR" 
26 PRINTTPBt !65 3 2. PRBU TlD&FGRSlNKELS 

£" 

20 PPIN7TPBM6S3" 3. TEST flF UflPIPBLER" 

30 PRINTTflBC I5SJ" 1. PFSLUT PpOGRPH " 

32 PRINTTABt2fter ( P€03 INPtPST t OFf J CREU 
J 0KSKEDE[ OFF 3 C REU J 7 fit I OFF J [ HDH J " 

31 GET ^ 

36 If M t THEN 19 
30 If = 2 THEN 36 

10 If P =3 THEM 116 

12 If p = 1 THEN 222 

11 GOSMB180 

16 IF P <1 OR P>3 THEN 31 

19 : 

50 peh 

S2 REP > * 

51 PEP » &7JL INPBYGGET OR > 
56 REP > * 
SB REP 

60 : 

fi? rplNT 'ICLR J"; 

61 PRINTTPBCU y'L REU 3 INDsT JLL1NG &F UR" 
66 PPl[niflBtl25)"TPLLET SKP-L PNG1UES SJL 
EOES ; - 

60 FRINTTflP WJ"TlP£F.nINUTTER .5EKUNPER" 

70 PR3NTTP0131 3 "F 13761S" 

72 PRINTTP0C2173""; 

21 INPUT ■*NOPl) EP (CLDKKEH" ; T I * 

26 PRINTTP0Cl2->3"*LOKKEN ER NU : "S73i 

70 Y=5: GOSUPtai 

00 GOTO 22 

02 : 
91 REP 

06 REH > * 
80 REM > PRBU T3J3SFDRE1NKELSE > 

30 REP > * 

32 REfl **J*»*»x»*-»**»»?.x>x*»**>* 

31 ; 

36 PRINT'CCLRJ"; 

30 PPINTTPBOrtREUJPRBU T I OSF OR S I NKEL S P. 
C Off 3 " 

100 PRINTlflBt213 ] "HUOR PPNGE SEKuNPEF ?'* 

107 PPINTT8eC2S5 3""; 

101 INPUT"" ;Y 

106 PRlNTTflBtl 71 rSTPRT ! " 

108 GO£U0 131 

1 10 PRINTTfl0[31 3'"SLUT !" 

112 ■y^3:G0c;uei9i 

1 11 GOTO 22 

1 16 : 

110 REP >»»w»»?»>^»»»»»«» 
1Z0 REJ1 * % 
122 REP * TEST *JPRIP0LER * 

171 pen * * 

326 PEP 
I 28 : 

130 PRINT'tCl Rj"; 

132 PPINTTA0C3 3"TEJCST UflRIft0£L 0JDE TEKS 

7 OG TPL " 

131 PR1NTTP.0C93 J"Pi = "::INPUT pi 

136 PPlMlTFt0Ca33"TEKST UflPIflBEL BJPE TEK 
ST OG TflL" 

1 38 pRINTTflflC93;T8* = "*;: INPUT B* 

110 PP1NTTP0C93 3-HE1- TPI-SUP.R1P0EI . KUN 7 
PL " 

112 PRirnTPBt9^3"0> = INPUT 0> 

111 PRINT TflB £.93 J' PEC JppL TftLSUPRl P0EL .KU 
N TPL " 

116 FRI NTTflB C03 J " Ct 2SPCO = "";:INPUT C 



119 PRINT "C CLP 3 * 

1SE* PR3NTTfl0c3j'"pi = 

157 FRinnPBCl7?J"Bi : 

151 PPlNTTP0tl23 3"pi t 0* = ~;fli,-,pt 

156 FRINTTfl0C1233"B> ■ ";B> 

3S0 FRlNTTflBC 173 3' C(.7£pC3 - " ; C 

16a PPINlTr'PC173 J"B^ t r. = " ; 0* r [_ 

1*2 rPIMTTHBtfm j"£N GflUK 71L C REU j j L OFF 3 

Pxl REUJNl Cff 3Fj[ Hflp]" 

151 SET P4 

166 ]F Pi="j" THEN 130 
16B ]f flts>r THEN ?? 

170 GOTO 2 61 
172 : 

171 PEP »X>>»>?»»*x*>**yy>****}*? > * 
176 REJ1 * , 
179 PEP > PRINT UR I 0O&RSTE > 
160 REP > HflJPE HJOPNE > 
3 07 PEP > * 
lfll REH »»»»*>> »>**»»*7 

106 : 

186 PR1NT"(H0P3"; 

130 PR J NTT PB L3B 3 ; L £F T i (. T J 1 . 2 3 ~ ; - ; TPP C 33 3 

PID4CT Jt .3.2 J": n ; TPBC 35 JRIGHT t CT 3 i .2 3 
137 RETURN 

131 : 

136 p£p ■ ■> * ■ ..>.->■»»■»,•» . » ■> <^u? 

139 REP > ^ 

200 REP > T1PSFORSINKELSE p. UflRIPBEL > 
202 pen 7 LCNGDE. » 

201 REP ». > 
206 PEP ,»**>>>»>»>>>*>j»;*x;»*»*>*»* 

?¥8 If V C = 8 THEN RETURN 

212 X=YV30B 

211 POP T=l TO X 
716 NEXT 7 

219 RETURN 

220 : 

722 REP >**>>>??ym»y*y>>yy*y% > ???>>y 

221 REP > * 
226 REP > PFSLUT PpOGRflP > 

27H p£p > ^ 

230 REP »»»»>%»7>»w»wy»»y%xfL 

232 : 

231 PRINT"CCLR3" 

236 FPINTTPBC71B 3TPBC2Sli3"ER PU SIKKER L 
REUJJCOfFTfl/tREtJ JNCOff 3£J 

230 GET PI 

210 If pi = "N" 7 HEN 22 

212 If fit = " J " THEN END 

211 GOTO 239 
216 : 
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Commodore 128. 
Den storste nyhed 

siden'64! 



Commodore 3-f-een computer med 128 K - ram. 

Programmer! ngssprog: Basic 2.0 I 64 mode 
Basic 7.0 1 128 mode 

CP/M indlcesntng af alle sprog A 7 Q C 
Kontant *T. / I/O" 




Commodore 
diskettestatlon 

1986 mode! 1570. 

Kontant 



3.995- 



Det var 64'eren, som gih hen: og blev den sterste hobby-computer 
succes til dato. 

"Storebror* 128 er nu i Fona's forretninger! 

Commodore 128 kaldes for verdens mest alsldlge computer. 
En "3-i-een" computer. 

For det forste har den 128 K-ram og mullghed for udvidelse til 512 K- 
ekstern ram. Den Indbyggede BASIC version 7.0 giver med sine over 140 
kommandoer virkellg gode mulighede r for spsendende, loglsk og struktureret 
programmering. 

For det andet ka n den bruges som en 64'er, med alle programmer og 
ydre enheder fra 64'eren, ellermed den nye 1570 dlskettestatlon. 

For det tredje kan 128'eren ved CP/M mode laese formater til rigtige 
computere. 

Fona byder dig velkommen til en demonstration 
af den nye Commodore 128. 




BASFdlsketter 

5,25-ld-enkeltsidet 
5,25-2d - dobbeltsidet 



1 StK. 34.95/ 10 stk. 319,95 
1 stk. 41,95/ 10 stk. 399,95 



Commodore datakassetteband 

C-15pr.sik. 14,95 




Fli 



nk ComP' lter 



K08ENHAVN: Amager-. Wge'irogiwte 49 |0I ) 37 21 31 AmagortwogaOe 126 (01)55 36 00 Sundbyvesier Plails I (01) 55 96 62 Ballsrup: Contiumgaden 26 (02| 65 44 55 
Br»t»she|; Fiedenl-ssundsvei 154 (01)2827 28 Fredcrikssundsvoi 330(01) 28 70 00. City: QsXergaOe&l (01)15 90 55. Farum: farum Byiwv 11 (02)95 5088. Fredertkstwtg: 
FalHonerAIie58A (01)3521 2? Gl.Kongevej 115(01)21 0893. Glostrup: Hoveavejen 85 (02)45 70 77 Greve: G/eveCemer8(02)9004 55. HaHarup: Sirandvejert 161 (01) 61 14 27 
Herlev: He*lev Byjade 2Bt02|- 94 67 87. Handle: Hunflie Slorcentc 9 (02) 90 07 90 Hvldavrt: Fnn«tens Bulittcenter (Oil 49 07 II HviOovre Slationncentw 37 (Oil 47 16 21 
Harsholm: iiovedfiawn l4i07>864l66 l«H»i:lsnoiBycenter32(02) 730233. Lyngby:LynnDvSlo«cetiief 38(02)8'' II 34. Nort-VMfcF'eaenhssundsve) 28(01) 190185 rwretuo: 
NonetyogaOe 34 (0I| 3' 77 88 NorreWngMe 174(01)83 03 45. FhKlovra: ROQOvre Ceni'ufn 131 (01)41 1? 77. Scborg: SoO0«g Ho-MftOde 56 (Ol) 56 17 65 TAstrup: City 2 
(02)52 1525 V»lby:Va)lriyLanegade56(0IH6 30 45 Vanta**: iemMne *tl#39 [Oil 74 35 18 VMtOfbro: Istedgade 95 (01) 2269 15 Oatartroi 0MertK0ga0e80(0I) 42 10 10 




Kllpkuponen ud 

og send den i en lukket konvolut til 
RUN Commodore-magasln, 
Torvegade 52, 1400 Kobenhavn K 



□ Jeg onsker at tegne et helarsabonnernent (1 0 numre) 
og sparer 20%. Fedselsdagstilbud kr. 196,- 

□ Jeg onsker at tegne el halvarsabonnement (5 numre) 
og sparer 1 5%. Fodselsdagstilbud kr. 104,- 

Jeg onsker bladet leveret fra nr. 



Navn: . 



V / Adresse; . 



Postnummer: . 



By. 



Commodore - MARKED 



AL J1D M RETTESPORMED 





EJ EN STANDARD- DISKETTE MEN 
PR IS SOM EN SA DA N. 
LE VERES I PL ASTBOKSE SOM STANDARD. 
EGEN PRODUKTION ERA A-Z. 
UVSVARIG NEDSUD'S GAR ANT I. 



'" I - >5. S^*Akud. 4 140 Bofua Til W 63 MOO 



REPARATION 

Er microdatamaten g&et i 
stykker? 

Ring og la en snak om problemet, oiler 
send datamalen lil os med posten. 
Vi reparerer hurtigt og biliigt og vi giver 
gerne el tilbud forsl 

Vi sselger ogsS reservedele og lilbehor. 




GR0NH0J 
elektronik 

v. Frode Harritz 
Mansiedvej 35 

7470 Karup 
TH. 06-66 11 56 



Commodore specialisten 
Byens billigste! 

Commodore 64 

SX-64-C16* Plus/4 

Diskettestation 1541 
Printer MPS-801 
Printer MPS-802 
Monitor 1701 

Erhvervsprogramrner, lege programmer, 
tilbehar, EDB-borde. 

Vi hardet hele' 

Ringogti 
er godi tilbud 



/VIIKRODATk 





Salgsafdelingen 
Blakildecentret 18 
2630 Tastrup 
02-99 93 71 

Sp^rg efter "b^gerne 
hOB din lokale bog- 
ell ler Computerforh . 



ARETS B0GER TIL 

COMMODORE 64/428 



Mark Andrews : 

Commodore 6^/128 Assembly language Programming 
EnRelsk 310 sider Howard Sams Kr Q0 

Mitchell Waite m. f 1 . : 

The Official book for the Commodore 128 
Engelsk 21Q sider Howard Sams 



Kurt Friis Hansen: 

Dus Med Commodore 6U/PLUS k 

Dansk 300 sider C&B 



Kr. 226.00 



Kr. 198.00 



Julegave ideer 

NYHED 

Disk Jockey kr. 115,00 

Hav de aktlve disketter llge ved hfinden, klan overskue-llgt og aamtidig beskyttet. 
Beregnet lil 5*4" formal (154T. 1570 og 1571). 

NYHED kr. 175,00 

(lorhandlere sages) . 
Diskette-taske 

i »gte oksehud, foret og alstivet. Beregnet lil 5 v» " disket ter , fas i sort, brun og Ivs stalbla . 
XIDEX diskette r (neutrale SVi") 

Enkeltsidet(SSDD)pr.stJe kr. 26,00 

10 stk. SSDD ) plastbox m/vlppelag kr. 260,00 

Dobbettsidet(DSDD)pr.stk kr. 30,00 

10stk. DSDDi plastbox m/vippelag kr. 300,00 

MindtteMbki (6(1.00 veo jieirc offltei - mowmillbud Alltpnwref mcl moma LffvonngslidtHOaoge. 
Veo •ofudbelallng p4 Q1RO8 W99 67. «!ler vM at Iramsonde en cnech. sendea fragtlnt > Danmar.. >eMe*s Mila*ggea nheiVavsgeoyr ogporto. 

Vor automatiske ordretelefon 02 — 18 89 38 er aben degnet rundt. 
Randmose Trading, Modekaergardsvej 12, 3540 Lynge 
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SELVF0LGEUG KAN MAN UDVIKLE EN 
PROFESSIONEL IBM-KOMPATIBEL PC'ER 
FOR UNDER 20.000 KR. 

NAR BARE MAN PR0VER HARDTNOK 




Derlor tod vl vftf tyste fa&nk udvikle, (oioed'o og 
videreudvikle vote professioneHe iBM-kompatible 
PC'ere Indni vi var sikre pa, at Cc vtile Mlreds- 
stille de professions le Qrugercs krav og ndl lit 

Commodore PC 10 og PC 20 er 16 8n 
PC'ere med 256K RAM Endvldere har PC 1Q 10 
floppy drav pa 360 K PC 20 hat en 10 Movie 
hard disk og e: floppy drev pa 360 K. Detle giver 
rnulighed lor al udnylte al software Itl IBM. 
(PC DOS systemert. 

Sarniidig er bade PC 10 og PC 20 lo'beredt 
med 5 udvklelsesslots, def - som att andei 
pa delo Commodore PCere - erIBM-kompatiflle 
PC 10 og PC 20 har naturugvis ogsa standard 
interlaces 

Def arbojdes med GW-BASlC, en lorpcdrer 
udgave al IBM '5 kendie BAS1CA 

Dansk laslalui 

Del lose tastatur har naturltgvis dansk 
tegnsat. Tasteine er ergonomt$k ngligl uflfomnet 
og logisk placeret. 

Varm modtagelse Ira lagpressen 

Mul>ghederne i Comm odoie PC 10 og PC 20 
er ulroliQi store, og Kan beds! torktares ar 
autonserel Commodore lortiandfer 

Men lagpressen har taget megel godl imod 
PC 10 oo PC 20. FaWisk konklutterede el kenCt 
compuler-maoasm etler al have provel denr 
«. Commodore har ihke tilol lavet en computer, 
net er fuldt kompalifjel med IBM's PC, men 
en selvstsndig enhed. som pa mange omrader 
overgai sil lorbiliede Kun prised erbesydekgi 
lavere « 

Pnserne et fakfcsk utroiigl lave 
Commodore PC 10 16.900 ki.excl moms 
Commodore PC 20 26.900 kr.excl moms 

Dei kan allsa lade sig gore at udvikle 
en professional IBM-Wmpalioel PC'er 1or unoei 
20.000 kr Hvis man vel al masrke prover 
hard! noH 



Commodore 

Fordi fremtiden forl&ngst 
er begyndt. 




Strandmarksvej 21. 2650 Hvidovre. Tlf.C01)78 5543 




Software 
Emballage 



Vi er forende producent i kassetter 
og ringbind til software emballage. 

Du kan fa produceret i aJle formater, 
materialer f ra papir til leaned, stof, skind og med 
den trykteknik, der passer til dit valg. 

Leverandor Ring og h0r naennere 

til «M. (06)29 59 77 




Michael Drewsens Vej 17, 8270 Hojbjerg 



RUN AMOK 

I modsaetning til julenissen har saetternissen den kedelige 
uvane, at nan er aktiv hele are!. 

I sidste nummer havde han fjenet det rigtige program 
fra Comalskolen og anbragt det samme somdet, der blev 
bragt i nummeret for. 

Fagredaktoren har dog ikke faet genudsendelseshonorar. 
og vi skynder os at bringe det rigtige program her - og Ises 
sa Comal-skolen fra sidste nummer en gang til. 



" // streg gernt i 
ni t sel=0 // nuls-tilling 



OOIO /"/ save "vakktur" 

OOaO /V digltalur med uakker (Comal skolo 

3> 

0030 /*/ ikrevBt af Henri mg R*ndmose , 

august 1985 
0040 f/ 
0050 r a mote * : = " 
u«r lab • 1 
oogo t i i =0; 
af uakker 

0070 USE jystem // akt iuar ing a* 
sya tamp ak kan 
0080 // 
0090 LOOP 
01OO PAGE 

0110 PRINT TABC 11 >, " " 18 "D IG ITAL-UR MED 
VffKKER" 

0130 PRINT AT 2,191 ■■IQ^MENU" 
0130 PRINT AT 10, 51 "1 inds-til ur ■ 
0140 PRINT AT i2 r 5i "2 indstil vakkar" 



PRINT AT 14,5" "3 sa ur ■ 

PRINT fllT 18,53 "tast tal *0r valgi 

ualgti - inkttyS 

CASE valg* OF 
WHEN -1 ■ 

at 11 'ur 
WHEN -a- 

'j«kkor 
WHEN "3- 

ur 

OTHERWISE 

PRINT AT £8,101 "uloullgt ualg" 

FOR 2l»l TO 200O DO NULL 
ENDCASE 



01S0 
O160 

0170 
□ 180 
0190 

oaoo 
osio 

0220 
0230 

oa4o 
oaso 
oeeo 

0270 

oeeo 

0290 ENOLOOP 
0300 // 

0310 PROC st il 'ur 
0320 PAGE 

033O REPEAT INPUT AT 8, li "lndtast 

t tmetal i -i tlm UNTIL t lm< -23 AMD tlm>*0 

0340 REPEAT INPUT AT 10,11 "Sndtast 

minutta) t -i min UNTIL mln<-59 ArC mln>-0 
0350 REPEAT INPUT AT 12, It "lndtast 

sakundtal i • t sek UNTIL sek<-39 AND sak>-0 

Q3SQ print AT 1B,H "start ur uad at 

trykke an tast" 

0370 WHILE KEY»»""0"" DO NULL 
0390 

*«tt Ime( STR«( t lm)+'i ■ +STR*<min>* ,, i ■♦STRSf 
sak > > 

0390 ENOPROC stil'ur 
0400 // 

04 10 PROC vakker 
0420 PAGE 

0430 PR INT TAB< 13), " * 18 ■ indst 1 1 uakker " 
0440 REPEAT INPUT AT 8, I J "lndtast 
timel -i ti UNTIL tlC=23 AND t i >»0 

0450 REPEAT INPUT AT 10,1! 'indtast 
mi nut t a 1 I ■« mi UNTIL mi< =53 A NO mi >-0 
04G0 ENOPROC v*kkar 
0470 // 
0480 PROC ur 



0490 
0300 



PRINT AT 1,321 SPC*( 9 ) 
REPEAT 



05 10 

osao 

0330 
for at 
0540 
VAL< g 



PRINT AT 1,33 1 
PRINT AT a, 33! 
PRINT AT 24, 1 1 
komma i valg mode" 

IF VAL< gett ima*( 718 > )»se 
tt tma*c 4i3) )=mi AND 



"I ",s»tt !ma*< 18) 
r amme* 

-■18-tryk an tast 



AND 



VAL< gett ima*< !2?>-tl THEN 

0550 be 1 1< 303 

0560 END IF 

0570 UNTIL KEY«<>"" 

05S0 ENDPROC ur 

0530 V/ 



RUN nr. 1 udkommer 
den 7. februar 1986 
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WG77GT TILBEH0R TIL ALLE, DER 

TAR DERES COMMODORE 64 ALVORUGT. 




Giver dig aAjart; ' . 

170 KB II 70 OO: v , 
data og pfograrr*-*- 
Testdiietie (tv^.-.- 



Din Commodore giver dig en lang 
rakke muligheder, som du far mest ud 
at ved at bruge udstyr. der er udviMet 
spectell ttl din computer. Isser lor dig. 
der er blevet fortrolig med 64"eren 
og skal igang med mere komplicerede 
opgaver, er del vigtigt med det bedst 
taenkelige perifere udstyr. 

• Med Commodore 1541 diskettesta- 
tion har du170Ktil din radighed, 
hurtig dataoverfersel og nem betjemng. 
Men ferst og fremmest giver C 1541 
adgang til hele det store software- 
udvalg, der iindes til C 64 pa diskette. 
FaktisK et af verdens sterste. 

• Commodore 1702 video-monitor har 
h0j oplBsningsgrad op giver florte 
grafiske opstilltnger. Og hvis du i dag 
bruger familiens fjernsyn slipper du 
for opstillingstid - og familien far lov til 
at seTVen gang imellem. 

• Med Commodore MPS 801 kan 

du printe grafik og skrift. Den kan ogs* 
udskrive fortrykte formularer som 
checks, regninger og meget mere. Med 
MPS 801 kan du ogsS vaare med i 
Datatips. Det nye utrolige system, hvor 
du blot betiBver at indtaste din 
udgangsr<ekke ( sa skriver systems! 
automatisk tipskuponeme ud. 
Og maske er du en af de heldige. . 

Fa" mere ud af din computer. 
Med nine har. der er skabt til den 



Commodore 

Fordi fremtiden forleengst 
erbegyndt. 




1D6S S 75621598 iD 

HOLSJEBRO B1BL10TEK 
INFORMATION 
KIRKESTRfEDE 11 
7300 UQLSTEBRQ 

BUS?:= 

PACK 

1stk. Commodore PC10 
1 stk. CP A-80 printer Incl. kabel 
1 stk. PC-Calc kalkulationssystem 
1 sth. BUSY-PACK Totaisystem* 

JULEPRIS- for hele pakken 

Kr. 33.995,00 

* Totalsystem bestaende at: 
Flnansbogtiolderi 
Fakturering 
Debnor/kredRorstyring 
s Lagerstyring 

Ovenstaende prts er excl. moms, men Incl. Installation/aftestning hos Dem, 
danske brugervejletf ninger - samt 4 timer konsulentassistance uden beregning. 

Hvad opnar De automatisk som kunde hos JD Totalinformation - Naestved 

De firPRISGARANTT* 
De far 12 mdrs. garanti pi maskineri 
De far 24 mdrs. garanti pa programmer 
De far HOT-LINE brugerservlce - daglig fra 8.00-20.00 uden beregning. 
De far alternative flnansieringsmuligheder. 
De far en samarbejdspartner der kan tose Deres specialopgaver 
De fir en samarbeldspartner med egen servlceorganlsation 
De far en samarbejdspartner De ogsa i fremtiden kan stole pa. 

JD -Tbtalii ifoniiatioi i 



NiGSTVED v/J.C. M0RCH 
• Jembanegade 7 • 4700Nagstved • Tlf. 03-72 68 88 • 

* " Kan De indenfcr 3 mdr fra inslallationsdato. erhverve en lesning identisk med ovenstaende til en billtgere pris, tllbagebeialer vl Dem nalurligvis pnsforskellen 





